VB 新手求指点 ，谢了 ！
如何让一个combo1的内容去影响另一个combo的内容，如 combo1内容选一个省份，combo2中就显示所选省份包含的城市

这是我编的 ，可是运行的时候实现不了 求指点
Private Sub Cmbo1_Change(Index As Integer)
With Cmbo1(2)
.Clear
Select Case Cmbo1(1).ListIndex
Case 0
.AddItem "1001班"
.AddItem "1002班"
.AddItem "1003班"
Case 1
.AddItem "2001班"
.AddItem "2002班"
.AddItem "2003班"
Case 2
.AddItem "3001班"
.AddItem "3002班"
.AddItem "3003班"

End Select
End With
End Sub