填空题
执行程序,单击命令按钮Command1后,窗体上显示的第一行内容是
1,最后一行内容是
2。
Private Sub Command1_Click()
Dim A As Integer, B As Integer, K As Integer
A=1:B=2
K=Fun((A), A)+Fun(A, B)
Print K
End Sub
Private Function Fun(N As Integer, M As Integer)As Integer
Static K As Integer
N=N+M
K=K+N+M
M=M+K+N
Fun=N+M
Print Fun; M; N
End Function