变量变化上时的程序有问题
Dim t As Long
Dim i As Integer
Private Sub Timer1_Timer()
i = i + 1
End Sub
Private Sub Form_Load()
Dim a As Variant
Dim c As Integer
t = a
a = i
If a <> t Then
c = c + 1
Text2.Text = c
End If
End Sub
我想让当a的值发生变化时,c的值自动加1
运行后没反映
不知道问题在哪
