自己做个按钮行吗?
Dim dlg As New OpenFileDialog dlg.Filter= "图片文件|*.jpg" dlg.MultiSelect = TrueIf dlg.ShowDialog = DialogResult.Ok Then Dim s1() As String = dlg.FileNames Array.Sort(s1) CurrentTable.Current("第一列") = String.Join(",",s1).Replace(",",vbcrlf)End If