假定有如下的Sub过程: Sub sfun(x As Single,y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上添加一个

admin2012-09-03  33

问题 假定有如下的Sub过程:
       Sub sfun(x As Single,y As Single)
         t=x
         x=t/y
         y=t Mod y
       End Sub
    在窗体上添加一个命令按钮(名为Commandl),然后编写如下事件过程:
       Private Sub Commandl_Click()
         Dim a As single
         Dim b As single
         a=5
         b=4
         sfum 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的值变为5Mod 4也就是1。过程调用结束时x和y的值分别回送给a和b。
转载请注明原文地址:https://kaotiyun.com/show/jWup777K
0

最新回复(0)