在窗体画一个命令按钮，然后编写如下事件过程：Private Sub Command1_CIick()Dim a(1 To 10)Dim p(1 To 3)k=5For i =1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(i*i)Next iFor i=1 To 3k=k+p(i)*2Next iPrint kEnd Sub程序运行后，单击命令按钮，输出结果是【 】。
题目
在窗体画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_CIick()
Dim a(1 To 10)
Dim p(1 To 3)
k=5
For i =1 To 10
a(i)=i
Next i
For i=1 To 3
p(i)=a(i*i)
Next i
For i=1 To 3
k=k+p(i)*2
Next i
Print k
End Sub
程序运行后，单击命令按钮，输出结果是【 】。
相似考题
更多“在窗体画一个命令按钮,然后编写如下事件过程: Private Sub Command1_CIick()Dim a(1 To 10)Dim p ”相关问题
-
第1题：
在窗体上画一个命令按钮，然后编写如下事件过程：
运行后的输出结果是______。
A．3
B．10
C．20
D．2
正确答案：A
解析：“If(条件，表达式1，表达式2)”根据“条件”返回表达式1或表达式2的值。 -
第2题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click（） Dim（） a=Array（”机床”，”车床”，”钻床”，”轴承”）Printa（2）EndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A.机床
B.车床
C.钻床
D.轴承
正确答案：C
暂无解析，请参考用户分享笔记 -
第3题：
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl_Click()
Dim a (1 To 10)
Dim p(1 To 3)
k=5
For i=1 To 10
a(i)=i
Nexti
Fori=1 To 3
p(i)=a(i*i)
Next i
For i=1 To 3
k=k+p(i)*2
Next i
Print k
End Sub
程序运行后，单击命令按钮，输出结果是【 】。
正确答案：33
33 解析：观察程序，通过第一个以i为循环变量的循环，给数组a()进行赋值，数组a()中的各个元素的值就是其下标值。
通过第二个以i为循环变量的循环，给数组p()进行赋值：
i=1,(i)=a(i*i),p(1)=a(1)=1
i=2,p(i)=a(i*i),p(2)=a(4)=4
i=3,p(i)=a(i*i),p(3)=a(9)=9
通过第三个以i为循环变量的循环，得到变量k的值；
i=1,k=k+p(i)*2=5+p(i)*2=7
i=2,k=k+p(i)*2=7+p(2)*2=15
i=3,k=k+p(i)*2=15+p(3)*2=33
最终输出结果是：33。 -
第4题：
在窗体上画一个命令按钮，然后编写如下事件过程。 Private Sub Command1_Click( ) Dim m As Integer, n As Integer, p As Integer m=3: n=5:p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是
A．4
B．6
C．8
D．10
正确答案：C
解析：此程序考查了函数的调用，函数过程有3个形参，功能是将第1个与第2个形参的和赋给第 3个形参，其中前两个形参是按值传递，不会影响实参的数值，即在调用函数过程的过程中，不变化实参的数值；而第3个形参是按址传递，传递的是实参的地址，这样实参会随着过程中形参的变化而变化，即改变实参的数值。在主调过程中定义了3个整型变量，分别赋值 3、5、0，调用过程后m、n的数值仍然是3、5，而p的值不再是0而变为8，即m、n的和，这也是被调函数的作用。注意： 参数按传值方式传递时，不改变实参中的值；按传地址的方式传递时，实参和形参指向同一个存储地址，所以实参指向的内容被改变。注意：参数传递方式的概念和应用 -
第5题：
在窗体上画一个命令按钮，然后编写如下事件过程：
程序运行后，依次输入3，2，1，0，-1，-2，则输出结果是__________。
正确答案：
-3【解析】本题考查VBA中循环的知识。对于这种循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件如何至少执行一次循环体。在Until循环中条件为False时执行循环体，条件为True时退出循环；在While循环中条件为True时执行循环体，条件为False时退出循环，这一点要注意区分清楚。本题是一个先判断条件的While循环，每次循环中有两次输入，共循环3次；由于在每次循环中均会重新对a、b、C进行赋值，所以只需要考虑最后一次循环就可以，在最后一次循环中c等于最后两次输入的值之和也就是-3