在窗体上画一个名称为Command1的命令按钮和一个名称为Label1的标签,然后编如下事件过程:Privat
A.1
B.5
C.27
D.45
A.1
B.5
C.27
D.45
在窗体上画一个名称为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
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 Click() Dim array1(10,10)As Integer Dim i,i AS Integer For i=1 TO 3 For j=2 TO 4 arrayl(i,i)=i+j Next j Next i Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是():
A.12
B.13
C.14
D.15
在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程: Private Sub Command_Click() Static b As Integer b=b+1 End Sub运行程序,第3次单击命令按钮后,变量b的值为______。
A.0
B.1
C.2
D.3
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim num As Integer num=1 Do Until num>6 Print num; num=num+2.4 Loop End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是______。
A.13.45.8
B.135
C.1 4 7
D.无数据输出
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是()。
A.4
B.5
C.6
D.7
在窗体上画一个标签(名称为Label1)和一个计时器(名称为Timer1),如图16-11所示,然后编写如下几个事件过程: Private Sub Form_Load() Timer1. Enabled=False Timer1. Interval=【 】 End Sub Private Sub Form_Cliek() Timer1. Enabled=【 】 End Sub Private Sub Timer1_Timer() Label1. Caption=【 】 End Sub 程序运行后,单击窗体,将在标签中显示当前时间,每隔1秒钟改变一次。请填空。
A.12
B.13
C.14
D.15
在窗体中添加一个名称为COMMAND1的命令按钮,然后编写如下事件代码: PRIVATE SUB COMMAND1_CLICK() A =75 IF A >60 THEN K=1 ELSEIF A > 70 THEN K=2 ELSEIF A > 80 THEN K=3 ELSEIF A >90 THEN K=4 ENDIF MSGBOX K END SUB 窗体打开运行后,单击命令按钮,则消息框的输出结果是()。
A.1
B.2
C.3
D.4
在窗体中添加一个命令按钮(名称为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.7
B.8
C.9
D.12
A.7 9
B.34 0
C.9 7
D.死循环