在窗体上画一个通用对话框，程序运行后，通过ShowOpen方法显示”打开”对话框，要求在该对话框的“文件类型”栏中只显示扩展名为.DOC的文件，则对通用对话框的 Filter属性的正确设置是： ______。

A.(*.DOC)*.DOC

B.(*.DOC)|(.DOC)

C.(*.DOC)||*.DOC

D.(*.DOC)|*.DOC

在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程： Private Sub Command1_Click() CommonDialog1.Filter="All Files(*.*)|*.*|Text Files"&_ "(*.txt)|*.txt|Executable Files(*.exe)|*.exe" CommonDialog1.FilterIndex=3 CommonDialog1.ShowOpen MsgBox CommonDialog1.FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是______。

A．AllFiles(*.*)

B．Text Files(*.txt)

C．Executable Files(*.exe)

D．不确定

在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如下事件过程。 Private Sub Command1_Click() CommonDialog1.Flags=vbOFNHideReadOnly CommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt CommonDialog1.FilterIndex=1 CommonDialog1.ShowOpen MsgBox CommonDialog1.FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是

A．All Files(*.*)

B．Text Files(*.txt)

C．*.txt

D．All Files(*.*)|Text Files(*.*)

在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程。

Private Sub Command1_Click()

CommonDialog1.Flags=vbOFNHideReadOnly

CommonDialog1.Filter= "All Files(*.*) |*.*|Text Files(*.txt) |*.txt

CommonDialog1.FilterIndex=1

CommonDialog1.ShowOpen

MsgBox CommonDialog1.FileName

End Sub

程序运行后,单击命令按钮,将显示一个"打开"对话框,此时在"文件类型"框中显示的是

A．All Files(*.*)

B．Text Files(*.txt)

C．*.txt

D．All Files(*.*) |Text Files(*.*)

在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如 Private Sub Command1_Click() CommonDialogl. Flags = vbOFNHideReadOnly CommonDialogl. Filter =" All Files(*.*)|*. * |Text Files(*.txt)|*. txt CommonDialogl. FilterIndex = 1 CommonDialogl. ShowOpen MsgBox CommonDialogl. FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是

A．All Files(*.*)

B．Text Files(*.txt)

C．Batch Files(*.bat)

D．All Files(*. *)|Text Files(*.txt)

在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写下列事件过程：

Private Sub Command1_Click()

CommonDialog1.Filter="All Files(*.*)|*.*|Text Files"_

&"(*.txt)|*.txt|Batch Files(*.bat)|*.bat"

CommonDialog1.FilterIndex=1

CommonDialog1.ShowOpen

MsgBox CommonDialog1.FileName

End Sub

程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是【 】；如果在对话框中选择d盘temp目录下的tel.txt文件，然后单击“确定”按钮，则在MsgBox信息框中显示的提示信息是【 】。

在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如 下事件过程： Private Sub Commandl_Click() CommonDialogl，Flags=vbOFNHideReadOnly CommontDialogl．Filter="All Files(*．*)|*．*|Text Files (*.*)|*．txt|"_ & Batch Files (*．bat) |*．bat" CommonDialogl．Filterlndex=1 CommonDialogl．Showopen MsgBox CommonDialogl．FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是

A．All Fries(*.*)

B．Text Files(*.*)

C．Batch Files(*．bat)

D．All Files (*．*)|Text Files(*．*)

A.All Files(*.*)

B.Text Files(*.txt)

C.Bath Files(*.bat)

D.不确定

过程：

Private Sub Command1_Click（）

CommonDialog1.Filter="All Files（*.*）|*.*Text Files"&_

"（*.txt）|*.txt| Executable Files（*.exe）|*.exe"

CommonDialog1.Filterindex=3

CommonDialog1.Show Open

MsgBox CommonDialog1.FileName

End Sub

程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是（）。 A．All Files（*.*）

B．Text files（*.txt）

C．Executable Files（*.ext）

D．不确定

码； Private SubCommand1_Click() CommonDialogl.Filter=" All Files |*.*|(*.exe)|*.exe|(*.doC)[*.doc|(*.bmp)|*.bmp" CommonDialogl.FileName=" " CommonDialogl.Flags=vbOFNFileMustExist CommonDialogl.FilterIndex=3 CommonDialogl.DialogTitle="OpenFile(*.doC) CommonDialogl.Action=1 If CommonDialogl.FileName= "Then MsgBox "No file selected"，37，"Checking" Else End If End Sub 程序运行后，单击命令按钮，将显示一个对话框，该对话框的标题是 ______。

A．空字符

B．OpenFile(*.doC)

C．打开文件

D．保存文件