vb通用对话框的调用

2024-10-29 23:14:36

推荐回答（5个）

回答1：

1）VB通用对话框是需要在工程-部件，选Microsoft Common Dialog Control 6.0那个部件前勾选。按确定添加到工具箱。

2）然后在工具箱双击CommonDialog 控件添加到使用窗体。见下图红色箭头所指控件。

3）然后在使用该控件的某控件的某个事件中编写代码。如以下代码用于显示“打开”对话框然后在信息框中显示所选的文件名，显示在Msgbox对话框。

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

4）完成调试后保存窗体和工程。

回答2：

你的VB6有问题吧?不要使用精简版的VB6。要使用专业版或企业版的VB6且打它的sp6补丁。

正常情况下添加对话框控件到工具栏，然后从工具栏添加到窗体后，保存整个工程，再打开时就会有这个控件，不用重新添加。

回答3：

做个exe执行文件，或者点击工程文件打开，不要直接用窗体文件打开。

回答4：

你的vb有问题

回答5：

通用对话框是什么啊？