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

admin2021-09-06  62

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

选项 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的值变为5 Mod 4也就是1。过程调用结束时x和y的值分别回送给a和b。
转载请注明原文地址:https://jikaoti.com/ti/an90FFFM
0

最新回复(0)