-- 作者:czy
-- 发布时间:2013/3/24 12:25:00
--
自己做个按钮行吗?
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
|