若有如下sub过程： Sub sfun(x As Single, y As Single) t=x x=t y y=t Mod y End Sub 在窗体中添加个命令按钮command33，对应的事件过程如下： Private Sub Command33_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