问题 填空题

在窗体中添加一个命令按钮Command1和一个文本框Text1,编写如下代码:
Private Sub Command1_Click()
Dim x As Integer,y As Integer,z As Integer
a=5,b=10,c=0
Me!Text1=" "
Call p1(a,b,c)
Me!Text1=12
End Sub
Sub pl(XxAs Integer,y As Integer,z As Integer)
z=x+y
End Sub
程序运行后,文本框中应显示的内容为______。

答案

参考答案:O

解析: 由于在VBA中默认情况下,参数是按地址传递(ByRef),对形参的改变会影响到实参。本题中z的值等于a+b,这个z值会返回给实参c,所以文本框显示的内容为15。

单项选择题 共用题干题
单项选择题