在通用声明中定义a,在窗体中添加一个命令按钮Command1,编写如下程序代码:DimaAsIntegerSubtest()a=a+1:b=b+1:c=c+1PrintSub:;a;,;b;,;cEndSubPrivateSubCommand1_Click()a=2:b=3:c=4CalltestCalltestEndSub程序运行后,单击命令按钮,窗体中将显示( )A.Sub:3,4,5Sub:4,5,6B.Sub:2,3,4Sub:2,3,4C.Sub:3,1,1Sub:4,1,1D.Sub:1,1,1Sub:1,1,1
在通用声明中定义a,在窗体中添加一个命令按钮Command1,编写如下程序代码:
DimaAsInteger
Subtest()
a=a+1:b=b+1:c=c+1
Print"Sub:";a;",";b;",";c
EndSub
PrivateSubCommand1_Click()
a=2:b=3:c=4
Calltest
Calltest
EndSub
程序运行后,单击命令按钮,窗体中将显示( )
A.Sub:3,4,5Sub:4,5,6
B.Sub:2,3,4Sub:2,3,4
C.Sub:3,1,1Sub:4,1,1
D.Sub:1,1,1Sub:1,1,1
相关考题:
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_Click()Dim s,iFor i=1 To 10s=s+iNext iMsgBox sEnd Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为 。
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_Click()sum=0For i=1 To 100 step 2Next iMsgBox sumEnd Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
假定在窗体中的通用声明段已经定义有如下的子过程:Sub f(x As Single,y As Single)t=xx=yy=xEnd Sub在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:PrivateSubCommand1_Click()a=10b=20f(a,B)MsgBox abEnd Sub打开窗体运行后,单击命令按钮,消息框输出的值分别为( )。A.20和10B.10和20C.10和10D.20和20
( 11 )在窗体中添加一个命令按钮,名称为 Command1 ,然后编写如下程序:Private Sub Command1_Click()Dim s , iFor i=1 To 10s=s+iNext iMsgBox sEnd Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为 【 11 】 。
( 11 )在窗体中添加一个命令按钮(名称为 Command1 ),然后编写如下代码:Private Sub Command1_Click( )Static b As Integerb=b+1End Sub窗体打开运行后,三次单击命令按钮后,变量 b 的值是 【 11 】 。