单选题假定有如下Sub过程：
Sub sfun(x As Single, y As Single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：
Private Sub Command1_Click()
Dim a As single
Dim b As single
a=5
b=4
sfun a,b
MsgBox a & Chr(10)+Chr(13) & b
End Sub
则单击按钮后的输出结果是______。

A、 1和1
B、 1.25和1
C、 1.25和4
D、 5和4

【正确答案】 B

【答案解析】[解析] 此题考查考生对VBA中Sub过程中参数传递及对表达式运算的了解程度。在主过程中，变量a及变量b分别被赋值为5和4，然后调用Sub过程，在该过程中，变量x被赋值为a除以b的商1.25，而变量y则被赋值为a除以b的余数1，Sub过程结束后，参数返回，重新对变量a和b赋值，所以MsgBox所显示的值应当为1.25和1，故选项B为正确答案。