( 35 )假定有如下的 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 打开窗体运行后,单击命令按,消息框的两行输出内容分别为