VB文件夹浏览器.rar

VB文件夹浏览器，单击按钮，在文件夹浏览器中选择相应的文件夹，实现文件夹浏览和文件浏览，调用系统的文件夹浏览组件。单击窗体上的按钮后，将触发以下脚本： 　　Private Sub Command1_Click() 　　 Text1.Text = FPath$(Me.hWnd, "文件夹浏览器") 　　End Sub