vb的Timer事件

来源：百度知道 编辑：UC知道 时间：2024/04/29 08:29:46
用timer实现如果combox1显示1
那么按钮就enable就是true
当我按下按钮后按钮就是不能使用，并显示1
当combox1得显示换成2后
按钮就enable又变成是true
再当我按下按钮后按钮就是再次不能使用，并显示为2

Dim flag As Boolean
Private Sub Timer1_Timer()
If Val(Combo1.Text) <> 1 Then
Command1.Enabled = True
Else
Command1.Enabled = False
End If
End Sub
Private Sub Command1_Click()
flag = Not flag
If flag Then
Combo1.Text = 2
Else
Combo1.Text = 1
End If
End Sub

没有vb 手写一下
===========================
timer 事件

command.enable=true

===========================

command 事件

static a
a=a+1
combox1.text=a

========================