主题：关于向图片列添加图片时,自动命名的问题

以下代码:

Dim dr As DataRow = e.DataRow
If dr.IsNull("系列") Or Dr.IsNull("货号") Then
    MessageBox.Show("系列和货号不能为空!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    e.Cancel = True
Else
    e.SubFolder = dr("系列")
    e.FileName = dr("货号") & "(序号)" & ".jpg"   '一个货号有多张不同角度的图片,希望当我加入多张图片时,图片名称就以货号+序号的形式命名
End If