以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何获得用户通过OpenFileDialog选择的文件个数?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=126455)

--  作者:yeyijun
--  发布时间:2018/10/22 13:05:00
--  如何获得用户通过OpenFileDialog选择的文件个数?
如何获得用户通过OpenFileDialog选择的文件个数?

Dim dlg As New OpenFileDialog
Dim flm As WinForm.FileManager = e.Form.Controls("FM1")
\'dlg.Filter= "Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb"

dlg.MultiSelect=True
If dlg.ShowDialog = DialogResult.OK Then

   flm.AddFile(dlg.FileNames(0))
   \'flm.AddFile(dlg.FileNames(1))
   \'flm.AddFile(dlg.FileNames(2))
   \'flm.AddFile(dlg.FileNames(3))
  \' ...... 
   
End If

设置了

dlg.MultiSelect=True,我如何获得用户通过OpenFileDialog选择的文件个数??
知道了个数,我就可以逐一写入e.Form.Controls("FM1")了。


[此贴子已经被作者于2018/10/30 9:55:54编辑过]

--  作者:有点甜
--  发布时间:2018/10/22 14:55:00
--  

试试改成

 

Dim r As Row = Tables("增加新的货号_TYFI").AddNew
r("ITEM")="p888888"
messagebox.show(r("ITEM"))

--  作者:yeyijun
--  发布时间:2018/10/23 9:46:00
--  问题没有解决
问题没有解决!

一样的,提示为空,没有我赋的值

--  作者:有点甜
--  发布时间:2018/10/23 12:07:00
--  
具体实例发上来测试。
--  作者:yeyijun
--  发布时间:2018/10/25 15:07:00
--  问题自己解决了
问题自己解决了。
谢谢!