[填空題] 程序執(zhí)行結(jié)果s的值是 。
Private Sub sub1(Byval p As Integer)
p=p*2
End Sub
Private Sub Command1_ Click( )
Dim i As Integer
i=3
Call sub 1 (i)
if i＞4 then i=i mod 2
Print cstr(i)
End Sub

C

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