以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]筛选器如何设置成文件夹?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=157240)

--  作者:2425004926
--  发布时间:2020/10/9 16:07:00
--  [求助]筛选器如何设置成文件夹?
筛选器如何设置成文件夹?
Dim dlg As New OpenFileDialog \'定义一个新的OpenFileDialog
dlg.Filter= "图形文件|*.bmp;*.jpg;*.gif" \'设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
    Dim b As WinForm.TextBox = e.Form.Controls("TextBoxFile") \'定义选择文本框
    b.Value = dlg.FileName \'选择文本框里的值等于打开对话框刚才选定的文件及路径
End If
--  作者:有点蓝
--  发布时间:2020/10/9 16:10:00
--  

[此贴子已经被作者于2020/10/9 16:10:59编辑过]

--  作者:有点蓝
--  发布时间:2020/10/9 16:12:00
--  
dlg.Filter= "全部文件|*.*|图形文件|*.bmp;*.jpg;*.gif" \'设置筛选器
--  作者:2425004926
--  发布时间:2020/10/9 16:18:00
--  
 我的想法是只能选择文件夹,不能选择任何文件

--  作者:有点蓝
--  发布时间:2020/10/9 16:21:00
--  
那要换其它对话框:http://www.foxtable.com/webhelp/topics/0359.htm
--  作者:2425004926
--  发布时间:2020/10/9 16:29:00
--  
 非常谢谢!