设有如下程序: Private Sub sV(ByVal m As Integer, n As Integer) m = m * 2 n = n - 5 Print m; n End Sub Private Sub Form_Cli

admin2018-09-19  25

问题 设有如下程序:
Private Sub sV(ByVal m As Integer, n As Integer)
    m = m * 2
    n = n - 5
    Print m; n
End Sub
Private Sub Form_Click()
    Dim x As Integer, y As Integer
    x = 10
    y = 15
    sV x, y
    Print x; y
End Sub
运行程序,单击窗体,输出结果为

选项 A、20  10
10  10
B、10  15
20  10
C、20  15
10  15
D、20  10
20  10

答案A

解析 函数传递参数有值传递和引用传递。默认是引用传递。sV(ByVal m As Integer, n As Integer)函数中m为值传递,n为引用传递。值传递不改变实参值。即在Form_Click()过程中调用sV不会改变x的值。选A)。
转载请注明原文地址:https://jikaoti.com/ti/8km0FFFM
0

最新回复(0)