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

admin2017-06-22  29

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

答案B

解析 本题考查VBA中参数传递的知识。在VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时没有说明传递类型,则默认为传址传递,即形参的结果会传递给实参。本例就是传址传递,所以过程调用时x=a,也就是5;y=b,也就是4。在过程内x的值变为5/4也就是1.25,y的值变为5Mod4也就是1。过程调用结束时x和y的值分别回送给a和b,所以选项B正确。
转载请注明原文地址:https://jikaoti.com/ti/J020FFFM
0

最新回复(0)