如何实现两个COMBO控件的数据互为查询条件

Question

设计思路：
当COMBO1中的选项发生改变，则COMBO2中的LIST发上改变
如何实现？
请大侠赐教

Answer 1

Private Sub Combo1_Click()
    Combo2.ListIndex = Combo1.ListIndex   '条件自己设置
End SubPrivate Sub Form_Load()
    
    Combo1.AddItem "A"
    Combo1.AddItem "B"
    Combo1.AddItem "C"
    Combo1.AddItem "D"
    Combo1.AddItem "E"
    Combo1.AddItem "F"
    Combo2.AddItem "A"
    Combo2.AddItem "B"
    Combo2.AddItem "C"
    Combo2.AddItem "D"
    Combo2.AddItem "E"
    Combo2.AddItem "F"
    
End Sub