Question

vb通用对话框的调用

vb通用对话框的调用：因为通用对话框的使用是需要从“部件”中添加的，那么我第一次调用它后，编完了程序并且保存好了，等到第二次打开此程序时，需要再次从“部件”里添加它后才能使用此程序，不然通用对话框会不显示，无法显示出来。但是这样我就郁闷了，vb考试的上机判分系统会认为我的程序对通用对话框的设置是错误的，请问大侠们，我该怎么保存编制好的程序才不会让这个判分系统认为我错误，因为我明明已经编好了啊？急！！！

Answer 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）完成调试后保存窗体和工程。

Answer 2

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

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

Answer 3

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

Answer 4

你的vb有问题

Answer 5

通用对话框是什么啊？