[填空題] 程序執(zhí)行結(jié)果s的值是 【7】 。

Private Sub subl(Byval p As Integer)

p=p*2

End Sub

Private Sub Commandl_Click()

Dim i As Integer

i=3

Call subl(i)

ifi＞4 then i=i mod 2

Print cstr(i)

End Sub

C

[評(píng)析] By Val表示所聲明的參數(shù)是按值傳遞的。因此參數(shù)值的變化只在被調(diào)用的函數(shù)或過(guò)程中有效，即只是形參的值有變化，而實(shí)參不受影響．ByRef表示所聲明的參數(shù)是按地址傳遞的。因此形參值的變化都會(huì)反映在實(shí)參上。本題程序中，參數(shù)p是按值傳遞的，因此調(diào)用subl后，實(shí)參i的值仍為3。