以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  多张选定的图片自动加入到 图片列的指定行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=30214)

--  作者:老菜根2011
--  发布时间:2013/3/23 9:31:00
--  多张选定的图片自动加入到 图片列的指定行
我的合同表中有一行图片列,用来管理公司和合同扫描图片,在每一行图片列 中每次要加好几张,有时是十几张图片,如何设计一个程序,让我选定的图片一健加指定行中,加入后并将原图片删除








--  作者:唐尸三摆手
--  发布时间:2013/3/23 9:39:00
--  

 


图片点击可在新窗口打开查看此主题相关图片如下:2013-03-23 09-37-17.png
图片点击可在新窗口打开查看

--  作者:老菜根2011
--  发布时间:2013/3/24 12:06:00
--  
我要的是程序代码,
--  作者: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