填空题
执行下面的程序,单击命令按钮Command1后,窗体上显示的第一行内容是
1,第二行是
2,第三行是
3。
Private Sub Command1_Click()
Dim A As Integer, K As Integer
A=1
K=Fun(Fun(A, A), A)
Print "K="; K
End Sub
Private Function Fun(X As Integer, Y As Integer)As Integer
Static K As Integer
K=K+X+Y
X=X+Y
Y=Y+K
Fun=X+Y
Print Fun; X; Y
End Function