问题 单项选择题

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:
Private Sub Command1_Click()
Dim x,y,z As Integer
  x=5
  y=7
  z=0
  Text1.Text=""
  Call Funl(x,y,z)
  Text1.Text=Str(z)
End Sub
Sub Funl(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

解析: 过程Funl的参数c是按地址传递的(ByRef,默认的传递方式),而Funl用语句Call Funl(x,y,z)调用后,形参c的值为12,则实参z的值亦为12。

选择题
单项选择题