Question

如何弹出一个选择文件夹路径的对话框选择路径

Answer 1

VB6.0使用CommonDialog 控件弹出对话框选择文件路径。
通过使用 CommonDialog 控件的 ShowOpen 和 ShowSave 方法可显示“打开”和“另存为”对话框。

两个对话框均可用以指定驱动器，目录，文件扩展名和文件名。除对话的标题不同外，另存为对话外观上与打开对话相似

回答不容易,希望能帮到您,满意请帮忙采纳一下，谢谢 !

Answer 2

VB6.0使用CommonDialog 控件弹出对话框选择文件路径。
通过使用 CommonDialog 控件的 ShowOpen 和 ShowSave
方法可显示“打开”和“另存为”对话框。
两个对话框均可用以指定驱动器，目录，文件扩展名和文件名。除对话的标题不同外，另存为对话外观上与打开对话相似。
下例显示“打开”对话框然后在信息框中显示所选的文件名：

Private Sub Command1_Click()
' 设置“CancelError”为 True
CommonDialog1.CancelError = True
On Error GoTo ErrHandler
' 设置标志
CommonDialog1.Flags = cdlOFNHideReadOnly
' 设置过滤器
CommonDialog1.Filter = "All Files (*.*)|*.*|Text Files" & _
"(*.txt)|*.txt|Batch Files (*.bat)|*.bat"
' 指定缺省的过滤器
CommonDialog1.FilterIndex = 2
' 显示“打开”对话框
CommonDialog1.ShowOpen
' 显示选定文件的名字
MsgBox CommonDialog1.FileName '显示路径
Exit Sub
ErrHandler:
' 用户按了“取消”按钮
Exit Sub
End Sub