设有如下程序： 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 39

问题设有如下程序：
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://kaotiyun.com/show/Ryhp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类