假定有如下的Sub过程： Sub sfun（x As Single,y As Single) t=x x=t/y y=t Mod y End Sub 在窗体

假定有如下的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