在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写下列事件过程：Private Sub Command1_Click()CommonDialog1.Filter="All Files(*.*)|*.*|Text Files"_"(*.txt)|*.txt|Batch Files(*.bat)|*.bat"CommonDialog1.FilterIndex=1CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是【 】；如果在对话框中选择d盘temp目录下的tel.txt文件，然后单击“确定”按钮，则在MsgBox信息框中显示的提示信息是【 】。
在窗体上画一个通用对话框，其名称为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信息框中显示的提示信息是【 】。
相关考题：
在窗体上画1个命令按钮和1个通用对话框，其名称分别为Command1和CommonDialog1，然后编写如下事件过程：Private Sub Command1_Click（）CommonDialog1.______="打开文件"CommonDialog1.Filter="All Files（*.*）|*.*"CommonDialog1.InitDir="c:\"CommonDialog1.ShowOpenEnd Sub该程序的功能是，程序运行后，单击命令按钮，将显示“打开”文件对话框，其标题是“打开文件”，在“文件类型”栏内显示“AIl Files（*.*）”，并显示C盘根目录下的所有文件，请填空。
在窗体上画一个命令按钮和一个文本框，其名称分别为 Command1 和 Text1 ，然后编写如下事件过程：Private Sub Command1_Click（）Dim inData As StringText1.Text=" "Open "d:|| ML ） ||Myfile txt" for ________ As #1Do While ________Input # 1,inDataText1.Text=Text1.Text+inDataLoopClose #1End Sub程序的功能是，打开D盘根目录下的文本文件 myfile.txt, 读取它的全部内容并显示在文本框中。请填空
（ 10 ） 在窗体上画 1 个命令按钮和 1 个通用对话框 ， 其名称分别为 Command1 和 CommonDialog1 ， 然后编写下列事件过程：Private Sub Command1_Click( )CommonDialog1. 【 12 】 =" 打开文件 "CommonDialog1.Filter="All Files(*.*)|*.*"CommonDialog1.InitDir="C :\ "CommonDialog1.ShowOpenEnd Sub该程序的功能是 ： 程序运行后 ， 单击命令按钮 ， 将显示 “ 打开 ” 文件对话框 ， 其标题是 “ 打开文件 ” ，在 “ 文件类型 ” 栏内显示 “ AIl Files(*.*) ” ，并显示 C 盘根目录下的所有文件，请填空。
在窗体上画一个通用对话框，其名称为 CommonDialog1 ，然后画一个命令按钮，并编写如下事件过程：Private Sub Command1_Click（）CommonDialog1.Filter="All Files（*.*）|*.*Text Files"_"（*.txt）|*.txt| Executable Files（*.exe）|*.exe"CommonDialog1.Filterindex=3CommonDialog1.Show OpenMsgBox CommonDialog1.FileNameEnd Sub程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是（ ）。 A．All Files（*.*）B．Text files（*.txt）C．Executable Files（*.ext）D．不确定
（ 31 ）在窗体上画一个通用对话框，其名称为 CommonDialog1 ，然后画一个命令按钮，并编写如下事件过程：Private Sub Command1_Click()CommonDialog1.Filter = "All Files (*.*)|*.*|Text Files" _"(*.txt)|*.txt| Executable Files(*.exe)|*.exe"CommonDialog1.FilterIndex = 3CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub程序运行后，单击命令按钮，将显示一个 “ 打开 ” 对话框，此时在 “ 文件类型 ” 框中显示的是A ） All Files(*.*)B ） Text Files(*.txt)C ） Executable Files(*.exe)D ） 不确定
在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个名称为Command1的命令按钮，并编写如下事件过程：Private Sub Command1_ Click()CommonDialogFlags = cd10FNHideReadOnlyCommonDialogFilter= "All Files (*.*) ｜*.* ｜Text Files" "(*.txt ｜*.txt｜Batch Files (*.bat)｜*.bat)"CommonDialogFilterIndex = 1CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是 ______；如果在对话框中选择D盘temp 目录下的te1.txt 文件，然后单击“确定”按钮，则在信息框中显示的提示信息是______。
在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程：Private Sub Command1_Click（）CommonDialog1.Flags=vbOFNHideReadOnlyCommonDialog1.Filter= "All Files（*.*） |*.*|Text Files（*.*） |*.txt|" _ Batch Files（*.bat） |*.bat"CommonDialog1.FilterIndex=1CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub程序运行后，单击命令按钮，将显示一个"打开"对话框，此时在"文件类型"框中显示的是（ ）。A．All Files（*.*）B．Text Files（*.*）C．Batch Files（*.bat）D．All Files（*.*） |Text Files（*.*）
在窗件上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a=12345 Print Format S(a, "000. 00") End Sub 程序运行后，单击命令按钮，窗体上显示的是______。A．123.45B．12345.00C．12345D．00123.45
假设在窗体上建立了一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮Command1,并编写如下事件过程：PrivateSubCommand1_Click()CommonDialog1.Flags=4CommonDialog1.Filter=allfiles(*.*)|*.*|textFiles(*.Txt)|*.txt|BatchFilse(*.bat)|*.batCommonDialog1.FilterIndex=1CommonDialog 1.ShowOpenMsgBoxCommonDialog 1.FileNameEndSub程序运行后，单击命令按钮，将显示一个打开对话框，此时在文件类型对话框中显示的是( )A.AllFiles(*.*)B.出错C.BatchFiles(.bat)D.不确定
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程。Private Sub Command1_Click()CommonDialog1.Flags=vbOFNHideReadOnlyCommonDialog1.Filter= "All Files(*.*) |*.*|Text Files(*.txt)|*.txtCommonDialog1.FilterIndex=1CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub程序运行后,单击命令按钮,将显示一个"打开"对话框,此时在"文件类型"框中显示的是A．All Files(*.*)B．Text Files(*.txt)C．Batch Files(*.bat)D．All Files(*.*) |Text Files(*.txt)
在窗体上画一个名为CommonDialog1的通用对话框，一个名称为Command1的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框窗口。该窗口的标题为“Save”，默认文件名为“SaveFile"，在“文件类型”栏中显示“*.txt”。能够满足上述要求的程序是 ______。A．Private Sub Command1_ Click() CommonDialog1. FileName = "SaveFile" CommonDialog1. Filter = "All Files ｜ *.* ｜*.txt *.txt｜ *.doc｜ *.doc" CommonDialog1. Filterlndex = 2 CommonDialog1. DialogTitle = "Save" CommonDialog1. Action = 2 End SubB．Private Sub Command1_Click() CommonDialog1. FileName = "SaveFile" CommonDialog1. Filter = "All Files ｜*.* ｜ *.txt｜*.txt｜*.doc｜*.doc" CommonDialog1. Filterlndex = 1 CommonDialog1. DialogTitle = "Save" CommonDialog1. Action = 2 End SubC．Private Sub Command1_ Click() CommonDialog1. FileName = "Save" CommonDialog1. Filter = "All Files ｜%* ｜*.txt｜*.txt｜*.doc｜*.doc" CommonDialog1. Filterlndex = 2 CommonDialog1. DialogTitle = "Save" CommonDialog1. Action = 2 End SubD．Private Sub Command1_ Click() CommonDialog1. FileName = "SaveFile" CommonDialog1. Filter = "All Files ｜*.*｜*.txt｜*.txt｜*.doc｜*.doc" CommonDialog1. Filterlndex = 1 CommonDialog1. DialogTitle = "Save". CommonDialog1. Action = 1 End Sub
在窗体上画一个通用对话框，其名称为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．*.txtD．All Files(*.*)|Text Files(*.*)
在窗体上画一个名称为、commonDidog1的通用对话框，一个名称为Command1的命令按钮。要求单击命令按钮时,打开一个保存文稿件的通用对话框。该窗口的标题为”Save",缺省文件名为”SaveFile",在“文件类型”栏中显示*.txt,则能够满足上述要求的程序是A．Private Sub Command1_Click( ) CommonDislog1.FileName="SaveFile" CommonDialog1.Filter="All Files|*.*|(*.txt)|*.txt|(*.doc)|*.doc" CommonDialog1.FUterlndex=2 CommonDialog1.DialogTitle="Save" CommonDi810S1.Action=2 End SubB．Pnrate Sub Command1_Click( ) CommonDialog1.FileNamc="SaveFile" CommonDialog1.Filtcr="All Files|*.*|(*.txt)|*.txt|(*.doc)|*.doc" commonDislog1.Filterlndex=1 CommonDialog1.DialogTitle="Save" CommonDialog1.AcUon=2 End SubC．Private Sub Command1_C1ick( ) CommonDialog1.FileName="Saven" CommonDislog1.Filter="All Files|*.*I(*.txt)I*.txt(*.doc)1*.doc" CommonDislog1.Fiterlndex=2 Commondislog1.DialogTide="SaveFile" CommonDialog1.Action=2 End SubD．PnvateSubCommarldl_C1ick( ) CommonDialog1.FUeName="SaveFile" CommonDialog1.Filter="All Files|*.*I(*.txt)|*.txt|(*.doc)|*.doc" CommonDialog1.Filterlndex=1 CommonDialog1.DislogTitle="SaveFile" CommonDialog1.Achon=1 End Sub
在窗体上画一个名称为CommonDialog1的通用对话框和一个名为Command1的命令按钮。要求实现这样一个功能：单击命令按钮后，打开一个通用对话框用于保存文件，其窗口标题为“保存”，默认文件名为Data，在“文件类型”栏中显示*.txt。下列程序中能实现以上功能的是______。A．Private Sub Command1_ Click() CommonDialog1. FileName = "Data" CommonDialog1. Filter = "All Files｜*.｜* ｜(*.txt)｜(*.doc)｜*.doc" CommonDialog1. Filterlndex = 2 CommonDialog1. DialogTitle = “保存” CommonDialog1. Action = 2 End SubB．Private Sub Command1_ Click() CommonDialog1. FileName = "Data" CommonDialog1. Filter = "All Files｜*.*｜(*.txt)｜(*.doc)｜*.doc" CommonDialog1. FilterIndex = 2 CommonDialog1. DialogTitle =“保存” CommonDialog1. Action = 1 End SubC．Private Sub Command1_ Click() CommonDialog1. FileName = "Data" CommonDialog1. Filter = "All Files｜*.*｜(*.txt)｜(*.doe)｜*.doc" CommonDialog1. FilterIndex = 1 CommonDialog1. DialogTitle = “保存” CommonDialog1. Action = 1 End SubD．Private Sub Command1_ Click() CommonDialog1. FileName = "Data" CommonDialog1. Filter = "All Files｜*.*｜(*.txt)｜(*.doc)｜*.doc" CommonDialog1. FilterIndex = 1 CommonDialog1. DialogTitle = “保存” CommonDialog1. Action = 2 End Sub
在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮，要求单击命令按钮时，打开一个保存文件的对话框，该窗口的标题为“Save”，缺省文件名称为“SaveFile”，在“文件类型”栏中显示*txt，则能够满足上述要求的程序是A．Private Sub Command1_Click ( ) CommonDialog1．FileName="SaveFile" CommonDialog1．Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc" CommonDialog1．FilterIndex=2 CommonDialog1．DialogTitle="Save" CommonDialog1．Action=2 End SubB．Private Sub Command1_Click ( ) CommonDialog1．FileName="SaveFile" CommonDialog1．Filter="AllFiles|*.*|(*.txt)|*.txt|(*.do C)|*.doc" CommonDialog1．FilterIndex=1 CommonDialog1．DialogTitle="Save" CommonDialog1．Action=2 End SubC．Private Sub Command1 Click ( ) CommonDialog1．FileName="Save" CommonDialog1．Filter="AllFiles|*.*|(*.txt)|*.txt|(*.do C)|*.doc" CommonDialog1．FilterIndex=2 CommonDialog1．DialogTitle="SaveFile" CommonDialog1．Action=2 End SubD．Private Sub Command1 Click ( ) CommonDialog1．FileName="SaveFile" CommonDialog1．Filter="AllFiles|*.*|(*.txt)|*.txt|(*.do C)|*.doc" CommonDialogl.FilterIndex=1 CommonDialog1.DialogTitle="Save" CommonDialog1．Action=1 End Sub
在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程：Private Sub Command1_Click()CommonDialog1.Flags=vbOFNHideReadOnlyCommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txtCommonDialog1.FiherIndex=1CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是A．All Files(*.*)B．Text Files(*.*)C．*.txtD．All Files(*.*)|Text Files(*.*)
在窗体上画一个名称为CommonDialogl的通用对话框，一个名为Command1的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗体的标题为“Save”，默认文件名为“SaveFile”，在“文件类型”栏中显示*. txt，则能够满足上述要求的程序是______。A．Private Sub Command1_C1ick() CommonDialogl. FileName="SayeFile" CommonDialogl. Filter="All Files|*. *|(*. txt)|*. txt|(*. doe)|*. doc" CommonDialogl. FilterIndex=2 CommonDialogl. DialogTitle="Save" CommonDialogl. Action=2 End SubB．Private Sub Command1_Click() CommonDialogl. FileName="SaveFile" CqmmonDialogl. Filter="All Files|*. *|*. txt)|*. txt|(*. doe)|*. doff" CommonDialogl. FilterIndex=1 CommonDialegl. DialogTitle="Save" CommonDialogl. Action=2 End SubC．Private Sub Command1_Click() CommonDialogl. FileName="Save" CommonDialogl. Filter="All Files|*. *|(*. txt)|*. txt|(*. doe)|*. doe" CommonDialogl. FilterIndex=2 CommonDialogl. DialogTitle="SaveFile" CommonDia]ogl. Action=2 End SubD．Private Sub Command1_Click() CommonDialogl. FileName="SaveFile" CommenDialogl. Filter="All Files|*. *|(*. txt)|*. txt|(*. doc)|*. doe" CommonDialogl. FilterIndex=1 CommonDialogl. DialogTitle="Save" CommonDialogl. Action=1 End Sub
在窗体上画一个通用对话框，其名称为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，然后添加一个命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的标题为“打开”，在文件类型框中显示的是Text Files(*.txt)。则能够满足上述要求的程序是A．Private Sub Command1_Click() CommonDialog1. Flags=cdloFNHideReadonly CommonDialogl. Filter="AllFiles(*.*)|*.*|TextFiles"_ "(*.txt)|*.txt|BatchFiles(*.bat)|*.bat" CommonDialog1.FilterIndex=1 CommonDialog1.ShowOpen MsgB．Private Sub Command1_Click() CommonDialog1. Flags=cdloFNHideReadonly CommonDialog1. Filter="AllFiles(*.*)|*.*|TextFiles"_ "(*.txt)|*.txt|BatchFiles(*.bat)|*.bat" CommonDialog1. FilterIndex=2 CommonDialog1. ShowOpen MC．Private Sub Command1_Click() CommonDialog1. Flags=cdloFNHideReadonly CommonDialog1. Filter="AllFiles(*.*)|*.*|TextFdes"_ "(*.txt)|*.txt|BatchFiles(*.bat)|*.bat" CommonDialog1.FilterIndex=1 CommonDialog1.ShowSave MsgD．Private Sub Command1_Click() CommonDialog1. Flags=edloFNHideReadonly CommonDialog1. Filter="AllFiles(*.*)|*.*|TextFiles"_ "(*.txt)|*.txt|BatchFiles(*.bat)|*.bat" CommonDialog1.Filterlndex=2 CommonDialog1.ShowSave Msg
在窗体上画一个名称为CommonDialogl的通用对话框，一个名称为Command1的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的标题为Save，默认文件名为SaveFile，在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是 ______。A．Private Sub Command Click() CommonDialogl.FileName＝"SaveFile" CommonDialogl.Filte＝"All Files|*.*|(*.txt)|*.txt|(*.doC)|*.doc" CommonDialogl.FilterIndex＝2 CommonDialogl.DialogTitle＝"Save" CommonDialogl.Action＝2 End SubB．Private Sub Commandl_Click() CommonDialogl. FileName="SaveFile" CommonDialogl. Filter= "All Files| *. * | (*. txt)[*. txt| *. doc| *. doc" CommonDialogl. FilterIndex= 1 ComonDialogl. DialogTitle = "Save" CommonDialogl. AC．Private Sub Cmmandl_Click() CommonDialogl. FileName= "Save" CommonDialogl. FiLter="All Files | *. * |(*. txt)|*. txt|(*. doC)|*. doc" CommonDialogl. FilterIndex= 2 CommonDialogl. DialogTitle = "SaveFile" CommonDialogl. AD．Private Sub Commandl_Click() CommonDialogl. FileName = "SaveFile" CommonDialogl. Filter= "All Files|*. *|(*. txt)|*. txt| (*. doC)|*. doc" CommonDialogl. FilterIndex=1 CommonDialogl. DialogTitle= "Save" CommonDialogl. Ac
在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如下事件过程： Private Sub Commandl_click() CommonDialogl.Friter="AllFiles(*.*)|*.*|Text Files"_ "(*.txt)|*.txt|Executable Files(*.exe)|*.exe" CommonDialog1.FilterIndex=3 CommonDA．AllFries(*.*)B．TextFiles(*.txt)C．Executable Fries(*.exe)D．不确定
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是A． 123.45B．12345.00C．12345D．00123.45
在窗体上建立一个通用对话框，其名称为CommonDialog1，然后再添加一个命令按钮，并编写如下事件过程：PrivateSubCommand1_Click()CommonDialog1.Flags=cdlOFNHideReakOnlyCommonDialog1.Filter="AllFiles(*.*)|*.*|TextFiles"&"|(*.txt)|*.txt|BatchFiles(*.bat)|*.bat"CommonDialog1.FilterIndex=2CommonDialog1.ShowOpenMsgBoxCommonDialog1.FileNameEndsub程序运行后，单击命令按钮，将显示一个"打开"对话框，此时在"文件类型"框中显示的是（）A、AllFiles(*.*)B、TextFiles(*.txt)C、BatchFiles(*.bat)D、不确定
在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个名为Command1的命令按钮，并编写如下事件过程： Private Sub Command1_ Click() CommonDialogFlags= cd10FNHideReadOnly CommonDialogFilter= "All Files (*.*) ｜*.*｜Text File" _ "(*.txt) ｜*.txt ｜ Batch Files (*.bat)｜ *.bat" CommonDialogFilterIndex = 2 CommonDialogShowOpen MsgBox CommonDialogFileName End Sub程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是______。A．All Files (*.*)B．Text Files(*.txt)C．Batch Files (*.bat)D．不确定
在窗体上画一个通用对话框，其名称为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(*．*)
在窗体上画1个命令按钮和1个通用对话框，其名称分别为Commandl和CommonDialogl，然后编写如下事件过程：Private Sub Commandl_CUck()CommonDialog1.______="打开文件"CommonDialog1.Filter="All Files(*.*)|*.*"CommonDialog1.InitDir="C:\"CommonDialog1.ShowOpenEnd Sub该程序的
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click（）a = 12345Print Format$（a, "000.00"）End Sub程序运行后，单击命令按钮，窗体上显示的是（ ）。A．123.45B．12345.00C．12345D．00123.45