如何在VB中调用浏览文件夹对话框
我在VB编程中遇到了问题，我想设计弹出一个浏览文件夹的对话框来选择路径（就像是我们安装软件时那个一样），网上的代码太复杂，哪位高手来给个关键的函数，再解释一下参数。本人在此谢过。
这是效果
Declare Function SHBrowseForFolder Lib "shell32.dll" Alias "SHBrowseForFolderA" (lpBrowseInfo As BROWSEINFO) As Long
例如:CommonDialog1.ShowOpen,调用系统打开窗口
Dim Cdg As Object
Set Cdg = CreateObject("UserAccounts.CommonDialog")
Cdg.ShowOpen
End Sub
VB如何打开当前文件夹的文件夹和文件
为了在Visual Basic中打开当前文件夹的文件和文件夹，首先需要点击对话框下菜单，选择打开文件对话框。接着，通过点击FileName控件，设置FileName为需要打开的文件名。接下来，设置对象可见性的级别，以确保程序能正确访问所选文件。在对话框中找到并点击Title选项，设置一个合适的标题名称，这有助于用户识别...
vb怎么打开文件夹?
1、点击对话框下菜单，点击打开文件对话框。2、点击FileName控件，设置FileName文件名。3、然后在这里设置对象可见性的级别。4、点击Title选项，设置标题的名称。5、按F8开始单步调试代码，点击Command2，进入单步调试功能。6、多次按下F8或直接按下F5运行完成，就完成了读取文本文件内容并输出到立即窗口。
谁有用vb程序中"浏览文件夹"和"打开"的窗口
浏览文件夹的控件在VB的标准工具箱就有：分别是：定时器、驱动器、目录、文件，浏览文件夹需要驱动器、目录、文件三个控件。打开是一个对话框，不在标准工具箱，需要你添加，方法是：点击【工程】-【部件】在部件对话框选择：就可以了，确认后在工具箱出现：这个图标就是打开文件对话框，这个对话框不仅...
如图,在VB中,如何打开这样的文件夹选择对话框。用控件,还是API,谢谢...
打开文件对话框，添加CommonDialog控件就可以。添加方法：【工程】-【部件】在部件对话框勾选：Microsoft Common Dialog Control 6.0 (SP3)这样控件添加在工具箱中了，拖动到界面即可。主要代码：CommonDialog1.InitDir = "c:\/" '对话框初始目录 CommonDialog1.Filter = "文本文件 (.txt)|*.txt|图...
vb 打开文件夹对话框
先引用 CommonDialog 控件引用方法: 顶部菜单的工具--部件--然后找microsoft commondialog control打上勾即可使用方法:CommonDialog1.ShowOpen '显示“打开”对话框CommonDialog1.ShowSave '显示“另存为”对话框其余的用法查MSDN帮助吧还有就是用API函数完成,具体用到这两个函数:GetSaveFileName Get...
VB6.0浏览文件夹对话框,怎么做?
添加一个form2。把他当做弹出对话框，在form2中添加一个dirlistbox控件，在form1的command1的click事件中写入form2.show。在form2的dir1的click事件中写入form1.text1.text = dir1.path就OK了，避免使用繁琐的API函数
VB做一个文件夹对话框
在VB中显示文件夹浏览对话框 方法有二 请在窗体上添加两个命令按钮,一个用API调用 ,另一个引用 Shell调用(引用Microsoft Shell Controls And Automation对象)代码如下:Private Const BIF_RETURNONLYFSDIRS = 1 '从这里开始为API声明 Private Const BIF_DONTGOBELOWDOMAIN = 2 Private Const MAX_PATH...
VB 显示打开文件对话框
*|Text Files" & _"(*.txt)|*.txt|Batch Files (*.bat)|*.bat"' 指定缺省的过滤器 CommonDialog1.FilterIndex = 2 ' 显示“打开”对话框 CommonDialog1.ShowOpen ' 显示选定文件的名字 MsgBox CommonDialog1.FileName Exit Sub ErrHandler:' 用户按了“取消”按钮 Exit Sub End Sub ...
VB如何打开这样的文件夹浏览对话框
工程--部分--添加 Microsoft Common Dialog Control 6.0通用对话框 在工具栏双击通用对话框图标添加到窗体 Private Sub Command1_Click()CommonDialog1.ShowOpenEnd Sub通用对话框的使用方法自己去百度。
VB怎么实现一个文本框后面加个“浏览”的按键,然后可以打开电脑资源的...
'cdg1 就是commondialog Private Sub Command1_Click() '浏览按钮 CDg1.CancelError = True CDg1.DialogTitle = "导入数据文件"On Error GoTo openErr CDg1.Filter = "文本文件(*.txt,*.prn)|*.txt;*.prn" '设置打开的文件类型 CDg1.InitDir = App.Path CDg1.ShowOpen Text1.Text ...
