下列程序的执行结果为( )。 Private Sub Commandl Click() Dim P AS Integer,q As Integer p=12:q=20 Call Value(P,q) Pr

admin2012-12-08  28

问题 下列程序的执行结果为(     )。
    Private Sub Commandl Click()
    Dim P AS Integer,q As Integer
    p=12:q=20
    Call Value(P,q)  
    Print P;q
    End Sub
    Private Sub Value(ByVal m As Integer,ByVal n As Integer)
    m=m*2:n=n-5
    Print m;n
    End Sub

选项 A、20  12
20  15
B、12  20
12  25
C、24  15
12  20
D、24  12
12  15

答案C

解析 在Visual Basic中,参数缺省是按地址传递的,也就是使过程按照变量的内存地址去访问实际变量的内容。这样,将变量传递给函数时.通过函数可永远改变该变量的值。如果想改变传递方式可以通过在变量定义前加关键字ByRef或ByVal。ByRef为默认值,按地址传递.ByVal按照值传递,函数调用后不改变变量值。本题中函数为值传递参数,因此在函数中参数值发生变化,但调用结束后参数的值不会改变。
转载请注明原文地址:https://jikaoti.com/ti/HdO0FFFM
0

最新回复(0)