以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 如何同时打开多个文件??? (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=68419) |
-- 作者:haokan02 -- 发布时间:2015/5/17 14:56:00 -- 如何同时打开多个文件??? 如何同时打开多个文件??? 这个是只能打开一个文件 Dim dlg As new openfiledialog dlg.filter = "excel文件|*.xls|world文件|*.doc|access文件|*.ndb|wenbenwenjian|*.txt" If dlg.ShowDialog = DialogResult.OK Then Dim prc As new Process prc.file=dlg.FileName prc.start() End If
|
-- 作者:大红袍 -- 发布时间:2015/5/17 14:59:00 -- --------- [此贴子已经被作者于2015/5/17 15:32:20编辑过]
|
-- 作者:haokan02 -- 发布时间:2015/5/17 15:31:00 -- 这种方式,如果你打开3个文件,只是把第一个选中的文件打开三次! |
-- 作者:大红袍 -- 发布时间:2015/5/17 15:32:00 -- Dim dlg As new openfiledialog dlg.filter = "excel文件|*.xls|world文件|*.doc|access文件|*.ndb|wenbenwenjian|*.txt" dlg.MultiSelect = True If dlg.ShowDialog = DialogResult.OK Then For Each f As String In dlg.FileNames Dim prc As new Process prc.file=f prc.start() Next End If |
-- 作者:haokan02 -- 发布时间:2015/5/17 15:33:00 -- For Each f As String In dlg.FileNames 这个语句中 f 的值怎么传递?? 谢谢!
|
-- 作者:大红袍 -- 发布时间:2015/5/17 15:33:00 -- 看4楼。 |
-- 作者:haokan02 -- 发布时间:2015/5/17 15:37:00 -- 感谢!! |