窗体上命令按钮Commandl的事件过程如下：Private Sub Command1_Click()Dim total As Integertotal=s(1)+s(2)Print totalEnd SubPrivate Function s(m As Integer)As IntegerStatic x As IntegerFor i=1 To mx=x+1Next is=xEnd Function运行程序，第3次单击命令按钮Command1时，输出结果为【 】。
题目
窗体上命令按钮Commandl的事件过程如下：
Private Sub Command1_Click()
Dim total As Integer
total=s(1)+s(2)
Print total
End Sub
Private Function s(m As Integer)As Integer
Static x As Integer
For i=1 To m
x=x+1
Next i
s=x
End Function
运行程序，第3次单击命令按钮Command1时，输出结果为【 】。
相似考题
更多“窗体上命令按钮Commandl的事件过程如下:Private Sub Command1_Click()Dim total As Integertotal ”相关问题
-
第1题：
窗体Forml上有一个名称为Commandl的命令按钮，以下对应窗体单击事件的事件过程是（ ）。
正确答案：C
B) 【解析】窗体的单击事件不同于其他控件的单击事件，在事件过程头中不出现窗体名字，而是统一使用Form. Click0。
-
第2题：
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： PrivateSubCommandl_CnCk() aS="VisualBasic"， Print String(3,a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是( )。
A．VVV
B．Vis
C．sic
D．11
正确答案：A
-
第3题：
在窗体上添加一个命令按钮(名为Commandl)，编写如下事件过程：
打开窗体后，掣击命令按钮，消息框的输出结果是（ ）。
A)7
B)15
C)157
D)528
正确答案：B
本题考查VBA中多重循环的知识。见到多重循环的问题不要害怕，认真地分析清楚每一次循环这种问题就迎刃而解了。本题中，在每一次外循环开始的时候都把x的值置为4，所以我们只分析最后一次循环就可以了；同理中层循环每一次开始前都把x的值置为3，所以这个问题最后实际}：就是x的初值为3，执行最内层循环直到结束就可以了。根据程序内循环执行两次，最后x=366=15。 -
第4题：
在窗体上放置一个命令按钮Commandl，并编写其单击事件的程序，如下：
程序运行后，单击命令按钮，则在窗体上输出的内容为（ ）。
A．10
B．12
C．16
D．20
正确答案：B
【解析】程序首先使用Array函数为x数组变量赋值，然后利用For循环和If结构语句实现程序功能。程序执行过程如下：①当i--1时，x(i)=2；d=d-c＝-6；②当i--2时，x(i)=4：d＝d-c=-12；③当i＝3时，x(i)=6：d=d-c=18；④当i=4时，X(i)8;d=d+X(i)=-10；c=8；⑤当i=5时，x(i)=10；d=d十x(i)-O；c=10；⑥当i=6时，x(i)=12；d=d+x(i)=12；c=12。 -
第5题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A)机床
B)车床
C)钻床
D)轴承
正确答案：C
本题考查VBA中数组的知识。数组变量由变量名和数组下标构成，我们通常使用Dim语句来定义数组，其中下标下限缺省为0。本题中的af2)就是数组的第三个元素即“钻床”。 -
第6题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click（） Dim（） a=Array（”机床”，”车床”，”钻床”，”轴承”）Printa（2）EndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A.机床
B.车床
C.钻床
D.轴承
正确答案：C
暂无解析，请参考用户分享笔记