以下事件过程可以将打开的对话框的标题改为“新时代”的是
A.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.ShowOpen End Sub
B.Private Sub Command2 Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.ShowFont End Sub
C.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.Show End Sub End Sub
D.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.ShowColor End Sub
第1题:
( 10 ) 在窗体上画 1 个命令按钮和 1 个通用对话框 , 其名称分别为 Command1 和 CommonDialog1 , 然后编写
下列事件过程:
Private Sub Command1_Click( )
CommonDialog1. 【 12 】 =" 打开文件 "
CommonDialog1.Filter="All Files(*.*)|*.*"
CommonDialog1.InitDir="C :\ "
CommonDialog1.ShowOpen
End Sub
该程序的功能是 : 程序运行后 , 单击命令按钮 , 将显示 “ 打开 ” 文件对话框 , 其标题是 “ 打开文件 ” ,在 “ 文件类型 ” 栏内显示 “ AIl Files(*.*) ” ,并显示 C 盘根目录下的所有文件,请填空。
( 10 )【答案】 【 12 】 DialogTitle
【解析】 DialogTitle 属性用来设置对话框的标题。如果不设置该属性,则默认 “ 打开 ” 对话框的标题是“ 打开 ” , “ 保存 ” 对话框的标题是 “ 保存 ” 。
第2题:
以下事件过程可以将打开对话框的标题改为“新时代”的是
A.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.ShowOpen End Sub
B.Private SubCommand2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.ShowFont End Sub
C.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.Show End Sub
D.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.ShowColor End Sub
第3题:
在窗体上画1个命令按钮和1个通用对话框,其名称分别为Command1和CommonDialog1,然后编写如下事件过程:
Private Sub Command1_Click()
CommonDialog1.______="打开文件"
CommonDialog1.Filter="All Files(*.*)|*.*"
CommonDialog1.InitDir="c:\"
CommonDialog1.ShowOpen
End Sub
该程序的功能是,程序运行后,单击命令按钮,将显示“打开”文件对话框,其标题是“打开文件”,在“文件类型”栏内显示“AIl Files(*.*)”,并显示C盘根目录下的所有文件,请填空。
DialogTitle
DialogTitle属性用来设置对话框的标题。如果不设置该属性,则默认“打开”对话框的标题是“打开”,“保存”对话框的标题是“保存”。
第4题:
以下事件过程可以将打开对话框的标题改为"新时代"的是
A.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.ShowOpen End Sub
B.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.ShowFont End Sub
C.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.Show End Sub
D.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.ShowColor End Sub
第5题:
假定有下表所列的菜单结构:
━━━━━━━━━━━━━━━━━━━━
标题 名称 层次
────────────────────
显示 appear 1(主菜单)
大图标 bigicon 2(子菜单)
小图标 smallicon 2(子菜单)
━━━━━━━━━━━━━━━━━━━━
要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“?”。以下正确的事件过程是( )。
A.Private Sub bigicon_Click()
bigicon.Checked = False
End Sub
B.Private Sub bigicon_Click()
Me.appear.bigicon.Checked = True
End Sub
C.Private Sub bigicon_Click()
bigicon.Checked = True
End Sub
D.Private Sub bigicon_Click()
appear.bigicon.Checked = True
End Sub
第6题:
假设有如下事件过程:
Private Sub Command1_Click()
msg1$="Are You Continue to?"
msg2$="Open The Books"
r=MsgBox(msg1$,34,msg2$)
End Sub
运行该程序后,所出现的对话框的标题是【 】。
第7题:
(30)下列事件过程可以将打开文件对话框的标题改变为“new Caption”.A.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowFont End Sub B.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowOpen End Sub C.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowHelp End Sub D.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowColor End Sub
第8题:
在窗体上画一个通用对话框,其Name属性为Cont,再画一个命令按钮,Name属性为Command1,然后编写如下事件过程:
Private Sub Command1_Click()
Cont.FileName= ""
Cont.Flags=vbOFNFileMustExist
Cont.Filter= "All Files|*.*"
Cont.FilterIndex=3
Cont.DialogTitle= "Open File"
Co nt.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.该事件过程用来建立一个Open对话框,可以在这个对话框中选择要打开的文件
B.选择后单击"打开"按钮,所选择的文件名即作为对话框的FileName属性值
C.Open对话框不仅仅用来选择一个文件,还可以打开、显示文件
D.过程中的"Cont.Action=1"用来建立Open对话框,它与Cont.ShowOpen等价
第9题:
假定通用对话框的名称为CommonDialog1,命令按钮的名称为Command1,则单击命令按钮后,能使打开的对话框的标题为“New Title”的事件过程是( )。
A.Private Sub Command1_Click()
CommonDialog1.DialogTitle = "New Title"
CommonDialog1.ShowPrinter
End Sub
B.Private Sub Command1_Click()
CommonDialog1.DialogTitle = "New Title"
CommonDialog1.ShowFont
End Sub
C.Private Sub Command1_Click()
CommonDialog1.DialogTitle = "New Title"
CommonDialog1.ShowOpen
End Sub
D.Private Sub Command1_Click()
CommonDialog1.DialogTitle = "New Title"
CommonDialog1.ShowColor
End Sub
第10题:
如下图所示的两个窗体:
要使其中第一个窗体中的第一个命令按钮来控制显示第二个窗体,第二个命令按钮用来结束程序的运行(两个按钮名称为Command1和Command2)。则以下选项中,对这两个命令按钮编写的事件过程正确的是
A.Private Sub Command1 Click() Form2.Show 1 End Sub Private Sub Command2_Click()End End Sub
B.Private Sub Command1_Click() Show 1 End Sub Private Sub Conunand2_Click() End End Sub
C.Private Sub Conmmand1_Click() Show 1 End Sub Private Sub Command2_Click() End End Sub
D.Private Sub Command1_Click()Show 1, Form2 End SubPrivate Sub Command2_Click() End End Sub