我想根据combox1的内容来决定combox2的内容。该怎么办了?
比如说:
combox1.addItem "202left"
combox1.addItem "202right"
combox2.addItem "871left"
combox2.addItem "871right"
现在我想根据combox1的不同选择来显示combox2里面的内容,请教各位高手该怎么做了?
比如说:
combox1.addItem "202left"
combox1.addItem "202right"
combox2.addItem "871left"
combox2.addItem "871right"
现在我想根据combox1的不同选择来显示combox2里面的内容,请教各位高手该怎么做了?
Select Case Combo1.Text
Case "202left"
'控制 Combo2 的代码
End Select
End Sub
Select Case Me.Combo1.ListIndex
Case 0
Me.Combo2.Clear
Me.Combo2.AddItem "1---1"
Me.Combo2.AddItem "1---2"
Case 1
Me.Combo2.Clear
Me.Combo2.AddItem "2---1"
Me.Combo2.AddItem "2---2"
End Select
End SubPrivate Sub Form_Load()
Me.Combo1.AddItem "1"
Me.Combo1.AddItem "2"
End Sub
Select Case Me.Combo1.ListIndex
Case 0
Me.Combo2.Clear
Me.Combo2.AddItem "1---1"
Me.Combo2.AddItem "1---2"
Case 1
Me.Combo2.Clear
Me.Combo2.AddItem "2---1"
Me.Combo2.AddItem "2---2"
End Select
End SubPrivate Sub Form_Load()
Me.Combo1.AddItem "1"
Me.Combo1.AddItem "2"
End Sub