填空题

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

点击查看答案&解析