若有如下Sub过程: Sub sfun(x As Single,y As Sing
问题:
若有如下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&ehr(10)+chr(13)&b
End Sub
打开窗体运行后,单击命令按钮,消息框中有两行输出,内容分别为______。
A.1和1
B.1.25和1
C.1.25和4
D.5和4