在窗体上有1个名称为Commandl的命令按钮，并有如下事件过程和函数过程：Private Sub Commandl Click()Dim P As Integerp=m(1)+m(2)+m(3)Print PEnd SubPrivate Function m(n As Integer)As IntegerStatic s As IntegerFor k=1 To ns=s+lNextm=sEnd Function运行程序，单击命令按钮Commandl后的输出结果为
题目
在窗体上有1个名称为Commandl的命令按钮，并有如下事件过程和函数过程：
Private Sub Commandl Click()
Dim P As Integer
p=m(1)+m(2)+m(3)
Print P
End Sub
Private Function m(n As Integer)As Integer
Static s As Integer
For k=1 To n
s=s+l
Next
m=s
End Function
运行程序，单击命令按钮Commandl后的输出结果为
相似考题
更多“在窗体上有1个名称为Commandl的命令按钮,并有如下事件过程和函数过程:Private Sub Commandl Clic ”相关问题
-
第1题：
窗体Forml上有一个名称为Commandl的命令按钮，以下对应窗体单击事件的事件过程是（ ）。
A.控制流
B.数据流
C.模块调用
D.事件驱动
正确答案：B
B)【解析】窗体的单击事件不同于其他控件的单击事件，在事件过程头中不出现窗体名字，而是统一使用Form.Click。 -
第2题：
窗体Forml上有一个名称为Commandl的命令按钮，以下对应窗体单击事件的事件过程是（ ）。
正确答案：C
B) 【解析】窗体的单击事件不同于其他控件的单击事件，在事件过程头中不出现窗体名字，而是统一使用Form. Click0。
-
第3题：
在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl)，然后编写如下事件过程：
程序运行后，在文本框中输入3，然后单击命令按钮，则Y的值变为__________。
正确答案：
9【解析】本题考查多分支语句SelectCase的知识。SelectCase用于实现多分支结构，其使用格式为：
其功能是根据“测试表达式”的值，从多个语句块中选择符合条件的一个语句块执行.如果测试表达式的值等于某一个表达式的值，则选择该语句块的语句执行，执行完毕后退出Case结构。本题中由于x的值为3，符合第一个Case语句的条件，所以执行y=x*x后退出Case结构，最后Y的值为9。
-
第4题：
窗体上有名称为Commandl的命令按钮。事件过程及2个雨数过程如下：
Private Sub Commandl_Click()
Dim X As Integer，Y As Integer，z
x=3
Y=5
z=fy(Y)
Print fx(fx(x))，y
End Sub
Function fx(ByVal a As Integer)
a=a+a
fx=a
End Function
Function fy(ByRef a As Integer)
a=a+a
fy=a
End nlnction
运行程序，并单击命令按钮，则窗体上显示的2个值依次是【 】和【 】。
正确答案：1210
12,10 解析：函数fy中的参数a是按地址传递，函数fx中的参数a是按值传递，所以执行z=fy(y)后，y的值为10，z的值为10，x的值为3，而执行fx(fx(x))后，fx(fx(x))的为12。 -
第5题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A)机床
B)车床
C)钻床
D)轴承
正确答案：C
本题考查VBA中数组的知识。数组变量由变量名和数组下标构成，我们通常使用Dim语句来定义数组，其中下标下限缺省为0。本题中的af2)就是数组的第三个元素即“钻床”。