以文本方式查看主题

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

--  作者:yeyijun
--  发布时间:2018/10/30 10:00:00
--  我如何获得用户通过OpenFileDialog选择的文件个数??
如何获得用户通过OpenFileDialog选择的文件个数?  发帖心情 Post By:2018/10/22 13:05:00 [只看该作者

如何获得用户通过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")了。


--  作者:y2287958
--  发布时间:2018/10/30 10:09:00
--  

OpenFileDialog

  • FileNames
[此贴子已经被作者于2018/10/30 10:09:41编辑过]

--  作者:yeyijun
--  发布时间:2018/10/30 10:15:00
--  
不行的,dlg.FileNames 是一个一维数组,
怎样侦测此一维数组的元素个数????

--  作者:y2287958
--  发布时间:2018/10/30 10:23:00
--  
Length
--  作者:有点甜
--  发布时间:2018/10/30 10:25:00
--  
以下是引用yeyijun在2018/10/30 10:15:00的发言:
不行的,dlg.FileNames 是一个一维数组,
怎样侦测此一维数组的元素个数????

 

For Each file As String in dlg.FileNames

    msgbox(file)

Next

 

msgbox(dlg.FileNames.length)


--  作者:yeyijun
--  发布时间:2018/10/30 10:37:00
--  侦测文件个数
还是不行啊??!
谢谢
请看附件
图片点击可在新窗口打开查看此主题相关图片如下:无标题.png
图片点击可在新窗口打开查看

--  作者:yeyijun
--  发布时间:2018/10/30 10:41:00
--  谢谢,成功了
谢谢,成功了