阅读程序: Private Sub Form_Click() Dim x As Integer,y As Integer X=32:y=42 Call PCS(x,y) Print x;y End Sub

admin2018-05-08  29

问题 阅读程序:
    Private Sub Form_Click()
    Dim x As Integer,y As Integer
    X=32:y=42
    Call PCS(x,y)
    Print x;y
    End Sub
    Sub PCS(ByVal n As Integer,ByVal in As Integer)
    n=n Mod 10+10
    m=m M0d 10+10
    End Sub
    运行程序,单击窗体,输出结果为(    )。

选项 A、2 32
B、32 42
C、2 3
D、12 3

答案B

解析 单击窗体时,Form_Click()事件被触发,在Form_Click()事件中,定义了两个整型变量x和y,其初始值分别为32和42。通过执行语句“Call PCS(x,y)”来调用过程“PCS”,在调用过程“PCS”时伴随参数传递,在过程“PCs”中,形参n和m前使用ByVal,表示参数传递使用的是单向值传递,在被调过程“PCS”中,对形参的改变,不会影响实参x和y,故本题中x和y的值不变,所以B选项正确。
转载请注明原文地址:https://jikaoti.com/ti/xuy0FFFM
0

随机试题
最新回复(0)