若有如下sub过程: Sub sfun(x As Single,y As Single) t=x x=Uy y=t Mod y End Sub 在窗体中添加一个命令按钮command33,对应的事件过程如下: Private Sub Command33_C

admin2017-11-18  35

问题 若有如下sub过程:
Sub sfun(x As Single,y As Single)
t=x
x=Uy
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(lO)+chr(13)&b
Erid Sub
打开窗体运行后,单击命令按钮,消息框中有两行输出,内容分别为(     )。

选项 A、1和1
B、1.25和1
C、1.25和4
D、5和4

答案B

解析 由题意可知sfun函数实现求除数和求余数的功能,所以最终结果是1.25和l。
转载请注明原文地址:https://jikaoti.com/ti/2N10FFFM
0

最新回复(0)