[单项选择题] 在窗体上画一个通用对话框，其Name属性为Cont，再画一个命令按钮，Name属性为Command1，然后编写如下事件过程： Private Sub Command1 Click()

[单项选择题] 在窗体上画一个通用对话框，其Name属性为Cont，再画一个命令按钮，Name属性为Command1，然后编写如下事件过程：

Private Sub Command1 Click()

Cont.FileName=" "

Cont.Flags=vbOFNFileMustExist

Cont.Filter="All Filesl|*．*"

Cont.FilterIndex=3

Cont.DialogTitle="Open File"

Cont.Action=1

If Cont.FileName=" " Then

MsgBox "No file selected"

Else

Open Cont.FileName For Input As # 1

Do While Not EOF(1)

Input # 1,b$

Print b$

Loop

End If

End Sub

以下各选项，对上述事件过程描述错误的是( )

A．该事件过程用来建立一个Open对话框，可以在这个对话框中选择要打开的文件

B．选择后单击“打开”按钮，所选择的文件名即作为对话框的FileName属性值

C．Open对话框不仅用来选择一个文件，还可以打开、显示文件

D．过程中的“Cont.Action=1”用来建立Open对话框，它与Cont.ShowOpen等价

C

分析本题程序可知，该事件过程用来建立一个Open对话框，可以在这个对话框中选择要打开的文件，并且选择后单击“打开”按钮，所选择的文件名即作为对话框的FileName属性值。另外CommonDialog有两种打开方式，一是设置Action的值，另一种方法是直接设置打开方式，如Cont．ShowOpen，建立一个Open对话框。因此Open对话框只用来选择文件。