vb ComboBox 关联 CheckBox

来源：百度知道 编辑：UC知道 时间：2024/05/16 10:13:22
vb ComboBox 列表里有3的选项,除第一个选项外的另两个选项,对CheckBox都不可以操作,怎么能做到??
就是ComboBox 列表里的3个选项选第二个以后,CheckBox为灰色不能点的形式!!

Private Sub Combo1_Click()
Select Case Combo1.ListIndex
Case 0
Check1.Enabled = True
Case 1
Check1.Enabled = False
Case 2
Check1.Enabled = False
End Select
End Sub

Private Sub Form_Load()
For i = 1 To 3
Combo1.AddItem i
Next i
Combo1.ListIndex = 0
End Sub

ComboBox 的点击事件里加入
如果点击第一项的话CheckBox的ENABLE属性为TRUE
否则为FALSE就好了

洒家不戒女色 说的是正解。 kumu0531 说的是正确的方法。