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

admin2013-01-07  28

问题 假设有如下的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中,参数的传递方式有传址传递和传值传递两种。如果在过程声明时没有说明传递类型,则默认为传址传递,即把形参的结果传递给实参。本题传址传递过程调用时,x=a,y=b,在过程内x的值为5/4=1.25,y的值为5 Mod 4余1。调用结束后,把x和y的值分别传给a和b。
转载请注明原文地址:https://jikaoti.com/ti/wGw0FFFM
0

最新回复(0)