[單項(xiàng)選擇題] 單擊命令按鈕時(shí)，下列程序段的執(zhí)行結(jié)果為( )。

Private Sub Command1_Click()

Dim a As Integer, b As Integer, c As Integer

a-2:b=4:c=6

Call S1(a, b)

Print "a="; a; "b="; b; "c="; c

Call S2(a, b)

Print "a ="; a; "b="; b; "c="; c;

End Sub

Private Sub S1(x As Integer, y As Integer)

Dim c As Integer

x=2*x:y=y+2:c=x+y

End Sub

Sub S2(x As Integer, ByVal y As Integer)

Dim e As Integer

x=2*x:y=y+2:e=x+y

End Sub

A．a(chǎn)=4 b=6 c=6

a=4 b=6 c=6

B．a(chǎn)=8 b=6 c=6

a=8 b=6 c=6

C．a(chǎn)=4 b=6 c=6

a=8 b=6 c=6

D．a(chǎn)=8 b=6 c=6

a=4 b=6 c=6

C

在定義子過程的參數(shù)時(shí)，如果在參數(shù)前加上ByVal，表示是“傳值”參數(shù)，主調(diào)函數(shù)中參數(shù)的值不被改變，否則表示是“傳地址”參數(shù)，參數(shù)值會(huì)被調(diào)用的子過程改變。 題中S1過程的參數(shù)是“傳地址”，因此調(diào)用后a、b、c的值都改變了，分別為4、6、6；S2過程的參數(shù)中a是“傳地址”參數(shù)，b是“傳值”參數(shù)，因此調(diào)用后：值改變，b值不變，因?yàn)閏是過程變量，所以也沒有變化，因此輸出的值為8、6、6。