填空题 执行下面的程序,单击Command1按钮后,显示在窗体上的第一行内容是 1,最后一行内容是 2
Option Explicit
Dim A As Integer
Private Function fun1(X As Integer, Y As Integer)As Integer
Dim I As Integer
For I=1 To Y
Y=Y+1
X=X+1
A=X+Y
Next I
fun1=A+Y
Print fun1
End Function
Private Sub Command1_Click()
Dim B As Integer
A=2
B=2
Print fun1(fun1(A, A), B)
Print A
Print B
End Sub
【正确答案】
【答案解析】40 4