窗体上有一个名为Command1的命令按钮,并有如下程序:
Private Sub Command1_Click()
Dim a As Integer,b As Integer
a=13
b=27
Print Fun(a,b);a;b
End Sub
Private Function Fun(ByVal a As Integer,b As Integer) As Integer
a=a Mod 5
b=b\5
Fun=a
End Function
程序运行时,单击命令按钮,则输出的结果是______。
A) 3 8 5
B) 3 13 5
C) 3 13 27
D) 13 13 27
参考答案:B
解析: 本题考查函数的调用,其中函数参数a为传值调用,而b默认为传址调用,因此,主调程序中的a不会受影响,仍为13,主调程序中的b会和被调函数中的b同值。子函数中a=a Mod 5=13 Mod 5=3,子函数中的a=3,主函数中的a没变,Fun=a使得函数返回值为3,b=b\5=27\5=5,使得主函数和子函数的b都为5。因此,答案为B) 。