请教:我想做到当程序运行时,根据z的不同状态,界面上有预警,下面的程序却只能做到对z的初始状态响应,当z值变化时,不予响应,为何?
Private Sub Form_Load()
Call z_change()
End Sub
Private Sub 启动_Click()
z = 1
End Sub
Private Sub 停止_Click()
z = 0
End Sub
Sub z_change()
If z = 0 Then
Text1.Text = "门未开"
Else
Text1.Text = "ok,门已开"
End If
end sub