主题：多张选定的图片自动加入到 图片列的指定行

我的合同表中有一行图片列，用来管理公司和合同扫描图片，在每一行图片列 中每次要加好几张，有时是十几张图片，如何设计一个程序，让我选定的图片一健加指定行中，加入后并将原图片删除

1. 
   

 

此主题相关图片如下：2013-03-23 09-37-17.png

我要的是程序代码，

自己做个按钮行吗？

 

Dim dlg As New OpenFileDialog
dlg.Filter= "图片文件|*.jpg"
dlg.MultiSelect = True
If dlg.ShowDialog = DialogResult.Ok Then
    Dim s1() As String = dlg.FileNames
    Array.Sort(s1)
    CurrentTable.Current("第一列") = String.Join(",",s1).Replace(",",vbcrlf)
End If