问题补充:
单项选择题:
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:
Private Sub Command1_Click()
Dim x,y,Z As Integer
x=5
y=7
z=0
Text1.Text=“”
Call Fun1(x,y,z)
Text1.Text=Str(Z)
End Sub
Sub Fun1(ByVal a As Integer,ByVal b As Integer,c As Integer)
c=a+b
End Sub
程序运行后,如果单击命令按钮,则在文本框中显示的内容是( )。
A) 0
B) 12
C) Str(z)
D) 没有显示
答案:
答案:B
解析: 过程Fun1的参数c是按地址传递的(ByRef,默认的传递方式),而Fun1用语句Call Fun1(x,y,z)调用后,形参c的值为12,则实参z的值亦为12。