已解决求大神说下vb选择文件对话框哪种好一点

提问者：期待秋天 | 浏览次 | 提问时间：2016-12-29 | 回答数量：1

求大神说下vb选择文件对话框哪种好一点 Set sh = CreateObject("Shell.Application")Set fd = sh.BrowseForFolder(Me.hWnd, "选择您想将“Very...

已有1条答案

沸腾的黄土地8

回答数：71616 | 被采纳数：8

Set sh = CreateObject("Shell.Application")
Set fd = sh.BrowseForFolder(Me.hWnd, "选择您想将“VeryCD”复制到的地方，然后单击“复制”按钮", 0)
'Me.hWnd是“选择文件夹”对话框的父窗口句柄，不关闭对话框不能返回父窗口。改为0没这个效果。
'第三个参数0改为512不显示“新建文件夹”按钮
If TypeName(fd) = "Folder3" Then MsgBox "选择的文件夹是" & fd.Self.Path
希望我的回答可以帮到您，望采纳。

2016-12-29 19:50:56