动画演示:
源码:
'演示静态变量与一般变量的区别 Private Sub cmd_测试_Click() '定义一般变量 Dim Num1 As Integer '定义静态变量 Static NUm2 As Integer '程序每运行一次,变量累加1 Num1 = Num1 + 1 NUm2 = NUm2 + 1 MsgBox "一般变量:" & Num1 & " " & "静态变量:" & NUm2 End Sub