填空题

程序执行结果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

点击查看答案&解析