combobox问题

Question

如果我选中了COMboBOX中的一项后,就执行一个操作,这个怎么实现?比如我选中combobox下拉框中的第一项,则Frame1为可见,这个怎么表示?谢谢

Answer 1

Private Sub Combo1_Click()
If Combo1.ListIndex = 0 Then
    Frame1.Enabled = True
End If
End Sub

Answer 2

或者你把你要做的咚咚全部放在一个函数里面，通过combo的点击把listindex传进去做select case
Private Sub Combo1_Click()
  call Control(combo1.listindex)
End Subprivate sub Control(index)
select case index
  case 0
    text1.…………
  case 1
    frame…………
  case 2
    …………
  ……
  ……
end select
end sub