- 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=90595)
-- 发布时间：2016/9/17 21:05:00
-- [求助]如何使openfiledialog打开时位置指定
如何使openfiledialog打开时默认位置指定，这样就可以使窗口直接显示文件存放的位置，而不是上次使用的位置
尝试了dlg.FileNames =ProjectPath & "Attachments\\出库单.xls"
可惜不行~~~老师有办法吗
Dim dlg As New OpenFileDialog
dlg.Filter= "Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb" \'设置筛选器
dlg.MultiSelect = True
If dlg.ShowDialog = DialogResult.OK Then
OutPut.Show("你选择了" & dlg.FileNames.Length & "个文件, 分别是:")
For Each fl As String In dlg.FileNames
Output.Show(fl)
Next
End If
-- 发布时间：2016/9/18 8:53:00
--
Dim dlg As New OpenFileDialog
dlg.Filter= "Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb" \'设置筛选器
dlg.InitialDirectory = "C:\\Foxtable\\"
dlg.MultiSelect = True
If dlg.ShowDialog = DialogResult.OK Then
OutPut.Show("你选择了" & dlg.FileNames.Length & "个文件, 分别是:")
For Each fl As String In dlg.FileNames
Output.Show(fl)
Next
End If
-- 发布时间：2016/9/19 0:11:00
--
感谢老师，很棒
