假定有如下的Sub过程: Sub sfun(x As Single,y As Single) t=x x=t/y y=t Mod y EndSub 在窗体上添加一个命令按钮(名为Commandl),然后编写如下事件过程: PrivateSub Comman

admin2021-06-03  73

问题 假定有如下的Sub过程:
Sub sfun(x As Single,y As Single)
t=x
x=t/y
y=t Mod y
EndSub
在窗体上添加一个命令按钮(名为Commandl),然后编写如下事件过程:
PrivateSub Commandl_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和l
C、1.25和4
D、5和4

答案B

解析 此题中设定了一个sfun()函数,进行除法运算和求模运算。命令按钮的单击事件中,定义两变量a=5,b=4,调用sfun函数传递a,b的值给x,y进行运算,t=x=5,y=4;x=t/y=5/4=1.25(除法运算);y=t Mody=5 mod 4=1(求模运算)。sfun函数参数没有指明参数传递方式,则默认以地址方式传递,因此a的值为1.25,b的值为1,故B)选项正确。
转载请注明原文地址:https://jikaoti.com/ti/TuC0FFFM
0

随机试题
最新回复(0)