更多"在窗体上画1个命令按钮和1个通用对话框,其名称分别为Command1和"的相关试题:
[填空题]在窗体上画1个命令按钮和1个通用对话框,其名称分别为Commandl和
CommonDialogl,然后编写如下事件过程:
Private Sub Commandl_CUck( )
CommonDialog1.______="打开文件"
CommonDialog1.Filter="All Files(*.*)|*.*"
CommonDialog1.InitDir="C:/"
CommonDialog1.ShowOpen
End Sub
该程序的功能是,程序运行后,单击命令按钮,将显示“打开”文件对话框,其标题是“打开文件”,在“文件类型”栏内显示“AllFiles(*.*)”,并显示C盘根目录下的所有件,请填空。
[单项选择]在窗体上画一个名称为CommonDialog1的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程: Private Sub Command1_Click( ) CommonDialogl.FileName=“” CommonDialogl,Filter=“All File|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt” CommonDialogl.Filterlndex=2 CommonDialogl.DialogTitle=“VBTest” CommonDialogl.Action=1 End Sub对于这个程序,以下叙述中错误的是
A. 该对话框被设置为“打开”对话框
B. 在该对话框中指定的默认文件名为空
C. 该对话框的标题为VBTest
D. 在该对话框中指定的默认文件类型为文本文件(*.Tx
[单项选择]在窗体上画一个名称为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|(*.doC) |*.doc" CommonDialog1.FilterIndex=1 CommonDialog1.DialogTitle="Save" CommonDialog1.Action=2 End SubC) Private Sub Command1 Click ( ) CommonDialog1.FileName="Save" CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC) |*.doc" CommonDialog1.FilterIndex=2 CommonDialog1.DialogTitle="SaveFile" CommonDialog1.Action=2 End SubD) Private Sub Command1 Click ( ) CommonDialog1.FileName="SaveFile" CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC) |*.doc" CommonDialogl.FilterIndex=1 CommonDi
[单项选择]在窗体上画一个命令按钮和一个通用对话框,其名称分别为Command1和CommonDialogl,然后编写如下代码; 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(*.do
C. 打开文件
D. 保存文件
[单项选择]在窗体上有1个名称为CommonDialog1的通用对话框和1个名称为Command1的命令按钮,以及其他一些控件。要求在程序运行时,单击Command1按钮,则显示打开文件对话框,并在选择或输入个文件名后,就可以打开该文件。以下是Command1_Click事件过程的两种算法
算法1:
Private Sub Command1_Click( )
CommonDialog1.Show Open
Open CommonDialog1.File Name For Input As#1
End Sub
算法2:
Private Sub Command1_Click( )
CommonDialog1.Show Open
If CommonDialog1.File Name<>" "Then
Open CommonDialog1.File Name For Input As#1
EndIf
End Sub
下面关于这两种算法的叙述中正确的是【 】
A. 显示打开文件对话框后若未选择或输入任何文件名,则算法2会出错,算法1不会
B. 显示打开文件对话框后若未选择或输入任何文件名,则算法1会出错,算法2不会
C. 两种算法的执行结果完全一样
D. 算法1允许输入的文件名中含有空格,而算法2不允许
[填空题]在窗体上画一个通用对话框,其名称为CommandDialog1,再画一个命令按钮,其名称为Command1。程序运行时,单击命令按钮,在对话框内只允许显示文本文件。将以下程序补充完整。
Private Sub Command1_Click( )
CommandDialog1.Filter= 【15】
CommandDialog1.ShowOpen
End Sub
[单项选择]
窗体上有一个名称为CommonDialog1的通用对话框,一个名称为Command1的命令按钮,并有如下事件过程:
Private Sub Command1_Click( )
CommandDialog1.DefaultExt=”doc”
CommandDialog1.FileName=”VB.txt”
CommandDialog1.FileName=”All(*.*)|*.*|Word|*.Doc|”
CommandDialog1.FileName=1
CommandDialog1.ShowSave
End Sub
运行上述程序,如下叙述正确的是( )。
A. 打开的对话框中文件“保存类型”框中显示“All(*.*)”
B. 实现保存文件的操作,文件名是VB.txt
C. DefaultExt属性与FileName属性所指明的文件类型不一致,程序出错
D. 对话框的Filter属性没有指出txt类型,程序运行出错
[单项选择]在窗体上有一个名称为CommonDialog1的通用对话框和一个名称为Command1的命令按钮,以及其他一些控件。要求在程序运行时,单击Command1按钮,则显示打开文件对话框,并在选择或输入了一个文件名后,就可以打开该文件。以下是Command1_Click事件过程的两种算法。
算法1:
Private Sub Command1_Click( )
CommonDialog1.ShowOpen
Open CommonDialog1.FileName For Input As#1
End Sub
算法2:
Private Sub Command1_Click( )
CommonDialog1.ShowOpen
If CommonDialog1.FileName<>" "Then
Open CommonDialog1.FileName For Input As#1
End If
End Sub
下面关于这两种算法的叙述,正确的是______。
A. 显示打开文件对话框后若未选择或输入任何文件名,则算法2出错,算法1不会
B. 显示打开文件对话框后若未选择或输入任何文件名,则算法1出错,算法2不会
C. 两种算法的执行结果完全一样
D. 算法1允许输入的文件名中含有空格,而算法2不允许
[单项选择]
在窗体上有—个名为CommonDialog1的通用对话框和一个名称为Command1的命令按钮,以及其他—些控件。要求在程序运行时,单击Command1按钮,则显示打开文件对话框,并在选择或输入了—个文件名后,就可以打开该文件。以下是Command1_Click事件过程的两种算法
算法1:
Private Sub Command1_Click( )
CommonDialog1.ShowOpen
Open CommonDialog1.FileName For Input As #1
End Sub
算法2:
Private Sub Command1_Click( )
CommonDialog1.ShowOpen
IfCommonDialog1.FileName<>""Then
CommonDialog1.FileName For Input As #1
End If
End Sub
下面关于这两种算法的叙述中正确的是()。
A. 显示打开文件对话框后若未选择或输入任何文件名,则算法2会出错,算法1不会
B. 显示打开文件对话框后若未选择或输入任何文件名,则算法1会出错,算法2不会
C. 两种算法的执行结果完全—样
D. 算法1允许输入的文件名中含有空格,而算法2不允许
[单项选择]在窗体上画一个通用对话框,其名称为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. 不确定
[单项选择]在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程:
Private Sub Command1_Click( )
CommonDialog1.Flags=vbOFNHideReadOnly
CommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt
CommonDialog1.FiherIndex=1
CommonDialog1.ShowOpen
MsgBox CommonDialog1.FileName
End Sub
程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是
A. All Files(*.*)
B. Text Files(*.*)
C. *.txt
D. All Files(*.*)