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