更多"在窗体上画一个名称为CommonDialogl的通用对话框，一个名称为"的相关试题:
[单项选择]在窗体上画一个名称为CommonDialogl的通用对话框，一个名称为Commandl的命令按钮。然后编写如下事件过程： Private Commandl_Click（ ） CommonDialogl.FileName="" CommonDialogl.Filter="Allfile|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CommonDialogl.Filterlndex=2 CommonDialogl.DialogTifle="VBTest" CommonDialogl.Action=1 EndSub 对于这个程序，以下叙述中错误的是( )。
A. 该对话框被设置为“打开”对话框
B. 在该对话框中指定的默认文件名为空
C. 该对话框的标题为VBTest
D. 在该对话框中指定的默认文件类型为文本文件(*.Tx
[单项选择]在窗体上画一个通用对话框，其名称为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(*. *)
[填空题]在窗体上画一个通用对话框，其名称为CommandDialog1，再画一个命令按钮，其名称为Command1。程序运行时，单击命令按钮，在对话框内只允许显示文本文件。将以下程序补充完整。
Private Sub Command1_Click（ ）
CommandDialog1．Filter= 【15】
CommandDialog1．ShowOpen
End Sub
[单项选择]在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如下事件过程： Private Sub Command1_Click（ ） CommonDialogl.Flags=cdlOFNHideReadOnly CommonDialogl.Filter="All Files(*.*)|*.*|Text Files"& "(*.txt)|*.txt|Batch Files(*.bat)|*.bat" CommonDialogl.FilterIndex=2 CommonDialogl.ShowOPen MsgBoxCommonDialogl.filename End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显，示的是 ______。
A. All Files(*.*)
B. Text Files(*.tx
C. Batch Files(*.ba
D. 不确定
[填空题]在窗体上画1个命令按钮和1个通用对话框，其名称分别为Commandl和
CommonDialogl，然后编写如下事件过程：
Private Sub Commandl_CUck（ ）
CommonDialog1.______="打开文件"
CommonDialog1.Filter="All Files(*.*)|*.*"
CommonDialog1.InitDir="C:/"
CommonDialog1.ShowOpen
End Sub
该程序的功能是，程序运行后，单击命令按钮，将显示“打开”文件对话框，其标题是“打开文件”，在“文件类型”栏内显示“AllFiles(*.*)”，并显示C盘根目录下的所有件，请填空。
[单项选择]在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编 写如下事件过程： Private Sub Command1_Click（ ） CommonDialog1.Flags=cdlOFNHideReadOnly CommonDialog1.Filter="All Files(*.*)|*.*|Text Files"&_ "(*.txt)|*.txt|Batch Files(*.bat)|*.bat" CommonDialog1.FilterIndex=2 CommonDialog1.ShowOPen MsgBox CommonDialog1.filename End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是______。
A. All Files(*.*)
B. Text Files(*.tx
C. Batch Files(*.ba
D. 不确定
[单项选择]在窗体上画一个通用对话框图，其Name属性为Cont,瑞画一个命令按钮，Name属性为Command1，然后编写如下事件过程：
Privute Sub Command1_Click( )
Cont．FileName=" "
Cont．Flags=vbOFNFileMustExist
Cont．Filter="All Files| * . *"
Cont．FilterIndes_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. ++i;
B. D--；
C. c++；
D. --f；
[填空题]在窗体上画一个通用对话框，其名称为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信息框中显示的提示信息是【 】。
[单项选择]在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程：
Private Sub Command1_Click（ ）
CommonDialog1.Flags=cdlOFNHideReadOnly
CommonDialog1.Filter="All Files(*.*)|*.*|Text Files"_
"(*.txt)|*.txt|Batch Files(*.bat)|*bat"
CommonDialog1.Filter Index=2
CommonDialogl.ShowOPen
MsgBoxCommonDialog1.filename
End Sub
程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是 ______。
A. All Files(*.*)
B. Text Files(*.txt)
C. Batch Files(*.bat)
D. 不确定
