![](https://static.youtibao.com/asksite/comm/h5/images/m_q_title.png)
在窗体中添加一个名称为Lablel1的标签、两个名称为Text1和Text2的文本框以及名称为Command1的按钮
![](https://static.youtibao.com/asksite/comm/h5/images/solist_ts.png)
在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码: Private Sub Command1_Click() a=0:b=5:c=6 MsgBox a=b+c End Sub 窗体打开运行后,如果单击命令按钮,则消息框的输出结果为______。
A.11
B.a=11
C.0
D.False
A.abcEFG
B.abcefg
C.ABCefg
D.ABCEFG
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。
(1) 在名称为Form1的窗体上画一个名称为H1的水平滚动条,请在“属性”窗口中设置它的属性值,使之满足以下要求:它的最大刻度值为100,最小刻度值为1,在运行时鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1和L2的标签,并分别显示1和100,运行时的窗体如图19-1所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm
(2) 在名称为Form1的窗体上画两个文本框,名称分别为Text1和Text2,均无初始内容;再建立一个下拉菜单,菜单标题为“操作”,名称为M1,此菜单下含有两个子菜单项,名称分别为Cooy和Clear、标题分别为“复制”和“清除”。请编写适当的事件过程,使得程序运行时,单击“复制”菜单项,则把 Text1中的内容复制到Text2中,单击“清除”菜单项,则清除Text2中的内容(即在Text2中填入空字符串)。程序运行界面如图19-2所示。要求在程序中不得使用任何变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
A.nabled 
B.Visible 
C.Interval 
D.Timer
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click() s=0 For i=1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i LabeCaption=s End Sub 程序运行后,单击命令按钮,则标签中显示的内容是______。
A.1
B.5
C.27
D.45
A.orm1_mousedown
B.win_mousedown
C.orm_mousedown
D.mousedown_form1
Private Sub Command1_Click()
s = 0
For i = 0 To 15
X = 2 * i - 1
If X Mod 3 = 0 Then s = s + 1
Next i
Label
1.Caption = s
End Sub
程序运行后, 单击命令按钮, 则标签中显示的内容为
A.1
B.5
C.27
D.45
A.Private Sub Text1_Change()
Command1.Caption = "计算机等级考试"
End Sub
B.Private Sub Command1_ Click ()
Caption = "计算机等级考试"
End Sub
C.Private Sub Form1_ Click ()
Text1.Caption = "计算机等级考试"
End Sub
D.Private Sub Command1_ Click ()
Text1.Text = "计算机等级考试"
End Sub