单项选择题

假定有如下的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.5和1
C.1.25和4
D.5和4