试一下以下的代码
Private Sub Command1_Click()
Dim s As String
CommonDialog1.ShowOpen
Open CommonDialog1.FileName For Input As #1
Input #1, s
Text1.Text = s
Close #1
End Sub
VB通用对话框 怎么打开啊?
第一步：引入部件：“工程”->“部件”->“Microsoft Common Dialog Control 6.0(sp6)”->“应用”\\x0d\\x0a第二步：选中控件，将控件画到你的窗体中任意位置，它不会在运行的窗体中显示。\\x0d\\x0a第三步：在程序中这样写（比如点击按钮可以打开一个“打开窗口”）：\\x0d\\x0aPrivate Sub...
VB6.0,怎么画出通用对话框?
1、打开易语言，选择“新建Windows窗口程序”。2、在基本组件栏里拖拽编辑框、按钮和通用对话框到程序中。3、单击选中通用对话框，在左边的属性栏中看到“过滤器”一栏，我们按图片上的要求输入文本。4、输入以下代码：如果真 (通用对话框1.打开 ())，编辑框1.内容 ＝ 通用对话框1.文件名。5、就可...
VB6.0中怎么设置弹出对话框?
用Msgbox函数就可以了：i=Msgbox("你确定要启用吗？",vbYesNo,是否)if i=Yes then j=shell("D:\/1.TXT ",1)else end end if
求vb 6.0 打开文件对话框 操作控件和完整代码。
CommonDialog1.FilterIndex = 2 ' 显示“打开”对话框 CommonDialog1.ShowOpen ' 显示选定文件的名字 MsgBox CommonDialog1.FileName Exit Sub ErrHandler:' 用户按了“取消”按钮 Exit Sub End Sub CommonDialog 控件见:
如何在VB 6.0中添加和使用CommonDialog 控件?
CommonDialog 控件可以提供标准的打开、另存、选择颜色、字体、设置打印选项等对话框。在VB 6.0中可以按照以下的步骤添加、使用CommonDialog。单击菜单“工程”下的“部件”命令，将弹出“部件”对话框，如下图所示。在“部件”对话框下的“控件”选项卡下选中Microsoft Common Dialog Control 6.0,单击...
VB里怎么实现按一个按钮弹出“打开”对话框,并且复制选中文件地址到文本...
Private Sub Command1_Click()cd1.ShowOpen Text1.Text = cd1.FileName End Sub 上面代码中cd1是common dialog控件，添加方法：在vb6中单击菜单 工程-->部件，在部件对话框中选择microsoft common dialog control6.0 确定
VB6.0浏览文件夹对话框,怎么做?
添加一个form2。把他当做弹出对话框，在form2中添加一个dirlistbox控件，在form1的command1的click事件中写入form2.show。在form2的dir1的click事件中写入form1.text1.text = dir1.path就OK了，避免使用繁琐的API函数
VB6.0中的OpenFileDialog控件在什么地方?
1.ctrl+t,添加 microsoft Common dialogue control,勾上,2.添加刚才工具箱里多出来的commondialogue到form上 3.需要打开的时候,用下面的代码,显示打开文件对话框 CommonDialog1.ShowOpen
...包括“打开”、“颜色”、“字体”(能弹出对话框的)代码
先学好添加菜单。然后再学commondialog这个控件就行了。2，commondialog这个控件要自己添加，右击工具箱，单击部件，找到并选好microsoft common dialog control 6.0，再单击确定就可以了。3，利用commondialog的showopen 、showcolor、showfont方法就可以分别实现弹出“打开”、“颜色”、“字体”对话框 ...
在VB窗体中建立通用对话框的方法是什么?
在VB窗体中建立通用对话框的方法和操作步骤如下：1、第一步，在“工程”菜单中选择“部件”选项，见下图，然后进入下一步。2、第二步，完成上述步骤后，单击“控件”按钮，勾选“控件”列表中的“microsoft common dialog control6.0”这一项，然后单击“确定”，以使通用对话框控件添加到工具栏中，...
