（13）單擊命令按鈕時，下列程度的執(zhí)行結(jié)果是 Private Sub Command1_Click() Dim a As Integer,b As Integer,c As Integer a=2:b=4:c=6 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:e=x+y End Sub Sub S2(x As Integer,By Val y As Integer) Dim e As Integer x=2*x:y=y+2:e=x+y End Sub A.a=4 b=6 c=6 B.a=8 b=6 c=6 a=4 b=6 c=6 a=8 b=6 c=6 C.a=4 b=6 c=6 D.a=8 b=6 c=6 a=8 b=6 c=6 a=4 b=6 c=6

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