单选题
窗体上有一个名为Command1的命令按钮，并有如下程序：
Private Sub Command1_Click()
Dim a As Integer,b As Integer
a=8
b=12
Print Fun(a,b);a;b
End Suo
Private Function Fun(ByVal a As Integer,b As Integer) As Integer
a=a Mod 5
b=b/5
Fun=a
End Function
程序运行时，单击命令按钮，则输出结果是______。
【正确答案】
B
【答案解析】[解析] 本题考查函数的调用。函数中的参数a为传值调用，参数b默认为传址调用，因此主调函数中的a值不变仍为8，而主调函数中的b和被调函数中的b同值。子函数中的a=a Mod 5=3，此处只是子函数中a的值变为了3，主函数中没有改变。语句Fun=a使得Fun的值变为3，语句b=b/5=2，使得主调函数和子调函数中的b的值均变为2。