【单选题】

假定有如下的Sub过程：

Sub sfun(xAs Single,yAs Single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：
Private SubCommand1_Click()
Dim aAs Single
Dim bAs 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