[單項選擇題] 下列程序的執(zhí)行結果為()?！　?Private Sub Comrnandl_Click( )　　　　Dim p As Integer, q As Integer　　　　p=12：q=20　　　　Call Value(p, q)　　　　Print p; q　　 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　1220　15

B．12　2012　25

C．24　1512　20

D．24　1212　15

C

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