以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  文件夹选择问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=175644)
--  作者：shenfengxiaozi
--  发布时间：2022/3/13 21:16:00
--  文件夹选择问题

以下代码是选择某个文件，必须选择了个文件才能生效，如何改成只是选择某个文件夹

 

 

Dim dlg As New OpenFileDialog \'定义一个新的OpenFileDialog

If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
    MessageBox.Show("你选择的是：" & dlg.FileName,"提示") \'提示用户选择的文件
End If

[此贴子已经被作者于2022/3/13 21:18:08编辑过]
--  作者：有点蓝
--  发布时间：2022/3/13 21:20:00
--  
参考：http://www.foxtable.com/webhelp/topics/0359.htm