Private Sub Command1_Click()Static a As Integer '静态变量a = a + 2Command1.Caption = aEnd Sub怎么给a赋值? 比如a从10开始的!
Private Sub Command1_Click() Static a As Integer '静态变量 Static b% b = b + 1 If b = 1 Then a = 9 a = a + 1 Command1.Caption = a End Sub
Private Sub Command1_Click()
Static a As Integer, b As Boolean
If b Then
a = a + 2
Else
a = a + 10
b = True
End If
Command1。
Caption = a
End Sub
补充说明:
a初值为0。b初值为False
初次执行时,a=0+10=10
b=True
以后,因为b=True,每次都是执行a+2
。
静态变量是不能直接赋值的。 不过有一个办法: Private Sub Command1_Click() Static a As Integer '静态变量 for i = 1 to 10 a = a + 1 next Command1.Caption = a End Sub 这样应该可以的。