菜鸟请教，在线等侯！！！！

[zhanshen2286]

各位高手：
在下有一个问题请教大家：
我在编程时想把combobox2.additem受combobox1.additem的调用：
比如我的combobox1.additem 里面是系部。
而combobox2.additem 是全院班级。当我选中一个系部时，那么 combobox2.additem里面就只显示出这个系的班级供人选择。
我只编到：
Private Sub Form_Load()
ComboBox1.AddItem "计算机系"
ComboBox1.AddItem "生物系"
ComboBox1.AddItem "文秘系"
ComboBox2.AddItem "高职011"
ComboBox2.AddItem "高职012"
ComboBox2.AddItem "园林9"
ComboBox2.AddItem "园林8"
ComboBox2.AddItem "文秘4"
ComboBox2.AddItem "文秘5"
ComboBox2.AddItem "文秘9"
combobox1_keypress (Key)
End Sub
这里就不会了。
请高手指教！！！！！！

[snowcloud2002]

'在combobox的onclick事件中添加如下代码

private sub combobox2_onclick()
select case combobox1.text
case "计算机系"
combobox2.additem "某某班"
case "生物系"
combobox2.additem "某某班"
case ...
'剩下的你自己添加吧
end sub

[爱java更爱生活]

存到数组中做也可以，但是如果数据量太大的话还是用数据库加SQl比较方便

[simanh]

把2种信息分别写到array1和array2中，其中combox2中的信息的内容要包含combox1中的信息

在combox1的selectChang事件中写处理，用当前的text去array2中找对应的信息

[BlackHeaven]

combox2使用一个数据库保寸
把combox1的内容做为combox2的关键字做检索就可以了啊

[xiaomai1983816]

up

[xzp1030]

Private Sub Combo1_Click()
Select Case Combo1.Text

Case "a"
With Me.Combo2
.Clear
.AddItem "a"
.AddItem "b"
.AddItem "c"
End With
Case "1"
With Me.Combo2
.Clear
.AddItem "1"
.AddItem "2"
.AddItem "3"
End With

End Select
End Sub

[xzp1030]

上面少段代码

Option Explicit

Private Sub Combo1_Click()
Select Case Combo1.Text

Case "a"
With Me.Combo2
.Clear
.AddItem "a"
.AddItem "b"
.AddItem "c"
End With
Case "1"
With Me.Combo2
.Clear
.AddItem "1"
.AddItem "2"
.AddItem "3"
End With

End Select
End Sub



Private Sub Form_Load()

With Me.Combo1
.AddItem "a"
.AddItem "1"
End With
End Sub