[單項(xiàng)選擇題] 下列程序的執(zhí)行結(jié)果為

Private Sub Command1_Click()

Dim x As Integer，Y As Integer

x=12:y=20

Call Value(x，y)

Print x;y

End Sub

Private Sub Value(ByVal m As Integer，ByVal n As Integer)

m=m*2:n=n-5

Print m；n

End Sub

A．20 12

B．12 20

C．24 15

D．24 12

20 1 12 25 12 20 12 15

C

被調(diào)過(guò)程Value的兩個(gè)參數(shù)m和n前面都有關(guān)鍵字“ByVal”修飾，即在主調(diào)過(guò)程用此過(guò)程時(shí)，實(shí)參與形參之間是以傳值方式傳遞信息的，而當(dāng)實(shí)參與形參以傳值方式相結(jié)合時(shí)，形參的改變并沒(méi)有影響到實(shí)參，單單就這一點(diǎn)來(lái)說(shuō)，當(dāng)程序代碼執(zhí)行主調(diào)過(guò)程中的Print x；y語(yǔ)句時(shí)，x和y的值應(yīng)不變，還是12和20，這樣就能夠排除選項(xiàng)A)和選項(xiàng)B)了。當(dāng)主調(diào)過(guò)程調(diào)用被調(diào)過(guò)程時(shí)，把實(shí)參x、y的值分別傳給形參m和n，這就是說(shuō)此時(shí)形參m值為12，n值為20，執(zhí)行被調(diào)過(guò)程中的m=m*2:n=n-5語(yǔ)句后，m值為24，n值為15，所以Print m；n后，程序輸出的結(jié)果為24和15。最后程序輸出的結(jié)果如選項(xiàng)C)所示。