求助VB 有关combo的

来源:百度知道 编辑:UC知道 时间:2024/07/03 00:35:23
比如有combo1和combo2,当combo1选择“电脑班”时,combo2出现“硬件”,“软件”等选项,当combo1选择“网络班”时,combo2出现“维护”,“设计”等选项,请问如何编写代码,急需解决,谢谢

Private Sub Form_Load()
Combo1.AddItem "电脑班"
Combo1.AddItem "网络班"
Combo1.ListIndex = 0
End Sub
Private Sub Combo1_Click()
Combo2.Clear
If Combo1.Text = "电脑班" Then
Combo2.AddItem "硬件"
Combo2.AddItem "软件"
Else
Combo2.AddItem "维护"
Combo2.AddItem "设计"
End If
Combo2.ListIndex = 0
End Sub

if combo1.text = “电脑班" then
combo2.clear
combo2.additem "硬件"
combo2.additem "软件"
elseif combo1.text = “网络班” then
combo2.clear
combo2.additem "维护"
combo2.additem "设计"
end if

Private Sub Combo1_Click()
Combo2.Clear
if combo1.text="电脑班"
Combo2.AddItem "硬件"
Combo2.AddItem "软件"
elseif combo1.text="网络班"
Combo2.AddItem "维护"
Com