Private Sub Command1_Click()
C.ommonDialog1.Flags=vbOFNHideReadOnly
C.ommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt
C.ommonDialog1.FiherIndex=1
C.ommonDialog1.ShowOpen
MsgBox CommonDialog1.FileName
E.nd Sub
程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是
A.All Files(*.*)
B.Text Files(*.*)
C.*.txt
D.All Files(*.*)|Text Files(*.*)
[单选题]在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程。Private Sub Command1_Click()C.ommonDialog1.Flags=vbOFNHideReadOnlyC.ommonDialog1.Filter= "All Files(*.*) |*.*|Text Files(*.txt)|*.txtC.ommonDialog1.FilterIndex=1C.ommonDialog1.ShowOpenMsgBox CommonD
[单选题]在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程:Private Sub Command1_Click()C.ommonDialog1.Flags=vbOFNHideReadOnlyC.ommonDialog1.Filter= "All Files(*.*) |*.*|Text Files(*.*) |*.txt|" _& Batch Files(*.bat) |*.bat"C.ommonDialog1.FilterIndex=1
[单选题]在窗体上画一个通用对话框,其名称为 CommonDialog1 ,然后画一个命令按钮,并编写如下事件过程:Private Sub Command1_Click()C.ommonDialog1.Filter="All Files(*.*)|*.*Text Files"&_"(*.txt)|*.txt| Executable Files(*.exe)|*.exe"C.ommonDialog1.Filterindex=3C.ommonDialog1.Show OpenMsgBox Co
[单选题]在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个名称为Command1的命令按钮,并编写如下事件过程:Private Sub Command1_ Click()C.ommonDialogFlags = cd10FNHideReadOnlyC.ommonDialogFilter= "All Files (*.*) |*.* |Text Files" &"(*.txt |*.txt|Batch Files (*.bat)|*.bat)"C.ommonDialo
[单选题]( 31 )在窗体上画一个通用对话框,其名称为 CommonDialog1 ,然后画一个命令按钮,并编写如下事件过程:Private Sub Command1_Click()C.ommonDialog1.Filter = "All Files (*.*)|*.*|Text Files" & _"(*.txt)|*.txt| Executable Files(*.exe)|*.exe"C.ommonDialog1.FilterIndex = 3C.ommonDialog1.Show
[单选题]在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如下事件过程: Private Sub Commandl_click() CommonDialogl.Friter="AllFiles(*.*)|*.*|Text Files"&_ "(*.txt)|*.txt|Executable Files(*.exe)|*.exe" CommonDialog1.FilterIndex=3 CommonDA.AllFries(*.*)B.TextFiles
[单选题]在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如下事件过程。 Private Sub Command1_Click() CommonDialog1.Flags=vbOFNHideReadOnly CommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt CommonDialog1.FilterIndex=1 CommonDialog1.ShowOpen MsgBox CommonD
[单选题]在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如 Private Sub Command1_Click() CommonDialogl. Flags = vbOFNHideReadOnly CommonDialogl. Filter =" All Files(*.*)|*. * |Text Files(*.txt)|*. txt CommonDialogl. FilterIndex = 1 CommonDialogl. ShowOpen MsgBox
[单选题]在窗体上画一个名称为CommonDialog1的通用对话框,一个名称为Command1的命令按钮。要求单击命令按钮时,打开一个保存文件的通用对话框。该窗口的标题为“Save”,缺省文件名为“SaveFile”;在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是( )A.Private Sub Command_Cilck() CommonDialOR1.P11eName="SaveFile" CommonDialOg1.Filter="AllFiles|*.*|(*.txt)|(*
[单选题]在窗体上画一个名称为CommonDialog1的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程: Private Sub Command1_Click( ) CommonDialogl.FileName=“” CommonDialogl,Filter=“All File|*.*|(*.DoC|*.Doc|(*.Txt)|*.Txt” CommonDialogl.Filterlndex=2 CommonDialogl.DialogTitle=“VBTest” CommonD