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

Private Sub subl(Byval p As Integer)

p=p * 2

End Sub

Private Sub Command1_Click( )

Dim i As Integer

i=3

Call sub1 (i)

if i＞4 then i=i mod 2

Print cstr(i)

End Sub

C

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