主题：[求助]图片管理

Dim dr As DataRow = e.DataRow
If dr.IsNull("基本信息_身份证号码")  Then
    MessageBox.Show("请先输入身份证号码!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    e.Cancel = True
Else
    e.FileName = dr("基本信息_身份证号码") & ".jpg"
End If

老师，上面代码对一个表所有图片列触发了事件，表有多列图片列每一列都有对应的名称列当名称列输入名称后图片列就自动写入名称。学习老师

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.table

老师，根据图片名称自动给图片自动取名。