（13）单击命令按钮时，下列程度的执行结果是 Private Sub Command1_Click() Dim a As Integer,b As Integer,c As Integer a=2:b=4:c=6 Call S2(a,b) Print"a=";a;"b=";b;"c=";c; End Sub Private Sub S1(x As Integer,y As Integer) Dim c As Integer x=2*x:y=y+2:e=x+y End Sub Sub S2(x As Int
题目
（13）单击命令按钮时，下列程度的执行结果是 Private Sub Command1_Click() Dim a As Integer,b As Integer,c As Integer a=2:b=4:c=6 Call S2(a,b) Print"a=";a;"b=";b;"c=";c; End Sub Private Sub S1(x As Integer,y As Integer) Dim c As Integer x=2*x:y=y+2:e=x+y End Sub Sub S2(x As Integer,By Val y As Integer) Dim e As Integer x=2*x:y=y+2:e=x+y End Sub A.a=4 b=6 c=6 B.a=8 b=6 c=6 a=4 b=6 c=6 a=8 b=6 c=6 C.a=4 b=6 c=6 D.a=8 b=6 c=6 a=8 b=6 c=6 a=4 b=6 c=6
相似考题
更多“(13)单击命令按钮时,下列程度的执行结果是Private Sub Command1_Click() Dim a As Integer,b As ”相关问题
-
第1题：
设有命令按钮Commandl的单击事件过程，代码如下：
运行程序，单击命令按钮，消息框输出结果是（ ）。A. 7
B. 8
C. 15
D. 22
正确答案：D
本题考查VBA中二维数组和循环的知识。本题中的第一个二重循环为二维数组进行了赋值，第二个循环 完成累加，关键是分析出累加了哪些元素。由循环体可以看出，实 际上3次累加分别累加的是a(1，3)、a(2，2)、a(3、1)，实际上就是二维 数组的对角线，累加和为7+8+7=22。 -
第2题：
若看到程序中确以下事件过程，则可以肯定的是，当程序运行时（ ）。 Private Sub Click—MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) Print"VB Program" End Sub
A.用鼠标左键单击名称为“Command1”的命令按钮时，执行此过程
B.用鼠标左键单击名称为“MouseDown”的命令按钮时，执行此过程
C.用鼠标右键单击名称为“MouseDown”的命令按钮时，执行此过程
D.用鼠标左键或右键单击名称为“Click”的命令按钮时，执行此过程
正确答案：D
D。【解析】事件过程的命名方式一般为事件对象_事件名，所以该事件应为“Click”的“MouseDown”事件。 -
第3题：
单击命令按钮时，下列程序的执行结果是 Private Sub Book(x As Integer) x=x * 2 + l If x＜6 Then Call Book(x) End If X=X * 2 + 1 Print x； End Sub Private Sub Command2_Click() Book2 End Sub
A．23 47
B．10 36
C．22 44
D．24 50
正确答案：A
解析：此题在函数调用过程中采用了简单递归的方式，具体流程如下：主调过程调用Book过程，把实参2传递给Book过程中的形参x，由x=x*2+1语句推出x=5，此时满足Book过程体中判断语句的判断条件，执行CallBook(x)语句，第二次调用Book过程。由x=x*2+1语句得到x值为11，判断条件1l6为假，故返回此调用过程执行x=x*2+1语句，的x=23并输出，结束此次调用过程。由于两次调用Book过程，第二次仍返回调用时的断点语句，即执行x=x*2+1，Printx，输出x的值为47，返回到主调过程，结束程序，两次输出为2347，正确答案为选项A。 -
第4题：
单击命令按钮时,下列程序的执行结果是
Private Sub Command1_Click()
BT 4
End Sub
Private Sub BT(x As Integer)
x=x*2 + 1
If x < 6 Then
Call BT(x)
End If
x=x 2
Print x;
End Sub
A．15
B．16
C．17
D．18
正确答案：D
解析：此题在函数调用过程中采用了简单递归的方式,具体流程如下:主调过程调用BT过程,把实参4传递给BT过程中的形参x,由x=x2+1语句推出x=9,此时不满足BT过程中判断语句的判断条件,执行x=x2;Print x;语句。由x=x2语句得到x值为18并输出,结束此次调用过程,返回到主调过程结束程序,输出结果为18。 -
第5题：
若看到程序中确以下事件过程，则可以肯定的是，当程序运行时（ ）。
Private Sub Click—MouseDown(Button As Integer，Shift As Integer，X As Single，Y
As Single)
Print"VB Program"
End Sub
A.用鼠标左键单击名称为“Command1”的命令按钮时，执行此过程
B.用鼠标左键单击名称为“MouseDown”的命令按钮时，执行此过程
C.用鼠标右键单击名称为“MouseDown”的命令按钮时，执行此过程
D.用鼠标左键或右键单击名称为“Click”的命令按钮时，执行此过程
正确答案：D
D。【解析】事件过程的命名方式一般为事件对象_事件名，所以该事件应为“Click”的“MouseDown”事件。 -
第6题：
下列关于图层设置的说法正确是（）。
A．可以选择“格式”-“图层”命令来执行
B．可以单击“视图”选项卡-“选项板”面板中的“图层特性”命令按钮来执行
C．可以单击“默认”选项卡-“选项板”面板中的“图层特性”命令按钮来执行
D．可以单击“图层”工具栏中“图层特性”命令按钮来执行
B