设有如下程序: Sub f(x As Integer,ByVal y As Integer) X=2*x y=y+X End Sub Private Sub Commandl Click() Dim a As Integer,b As In

admin2013-01-23  27

问题 设有如下程序:
Sub f(x As Integer,ByVal y As Integer)
X=2*x
    y=y+X
End Sub
Private Sub Commandl Click()
    Dim a As Integer,b As Integer
    a=6:b=35
    Call f(a,b)
    Print a,b
End Sub
程序运行后,单击命令按钮Commandl,输m结果为(    )。

选项 A、6  47
B、12   47
C、6  35
D、12  35

答案D

解析 此题中。f(a,b),a是以地址方式传递的.b是以值方武传递的,因此.b的值显然不发生变化、仍为35,a的值为2*6=12。
转载请注明原文地址:https://jikaoti.com/ti/flO0FFFM
0

最新回复(0)