vb多事件按钮 速度 在线等 好的+分

来源:百度知道 编辑:UC知道 时间:2024/06/19 02:17:43
如果Combox显示1
那么按下按钮就弹出MsgBox
然后Enabled等于False

如果Combox显示2
那么先Enabled等于True
然后再按下按钮
就弹出MsgBox

代码怎么写
我要弄6个这种事件
如果行不通,请告诉我另一种解决办法
Enabled是按钮的
MsgBox=MessageBox(不好意思,这个没解释)

Private Sub Combo1_Click()
If Combo1.Text = "2" Then Command1.Enabled = True
End Sub

Private Sub Command1_Click()
If Combo1.Text = "1" Then
MsgBox ("1")
Command1.Enabled = False
ElseIf Combo1.Text = "2" Then
MsgBox ("2")
End If
End Sub

Private Sub Form_Load()
Combo1.AddItem ("1")
Combo1.AddItem ("2")
End Sub

command1_click()
if combox.text="1" then
msgbox "..."
command1.enabled=false
endif
end

form1_load() '或放到其它事件中也行
if combox1.text="2" then
msgbox"...."
command1.enabled=true
endif
end