单选题 在窗体上画一个名称为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

程序运行后,如果单击命令按钮,则在文本框中显示的内容是


【正确答案】 B
【答案解析】[解析] 过程Fun1的参数c是按地址传递的(ByRef,默认的传递方式) ,而Fun1用语句CallFun1(x,y,2) 调用后,形参c的值为12,则实参z的值亦为12。