我建了2个combo box ,combo1,combo3.由于两个有联系，现在我想用1来控制3.就是当combo1text="1"的时候combo3的下拉菜单为1，2，3等，当combo1text="汉字"的时候combo3的下拉菜单为2，5，9等。当case=1的时候功能是实现的，当combo1的text为汉字的时候该功能就不能实现，请问怎么写啊对于汉字的时候。

Private Sub Combo1_Click()
Select Case Combo1.Text
Case "我":
Combo3.Clear
Combo3.AddItem "数学"
Combo3.AddItem "语文"
Combo3.AddItem "物理"

Case "你":
Combo3.Clear
Combo3.AddItem "英语"
Combo3.AddItem "政治"
Combo3.AddItem "化学"

End Select
End Sub

[[it] 本帖最后由 lzxagy 于 2009-2-2 17:28 编辑 [/it]]

Case "&汉字&" 把两个&给去掉

去掉&不行啊，我那样写不行才加的&

如果除了1就是汉字的话,就简单点
if Combo1.Text= "1" then
Combo3.Clear
Combo3.AddItem "1"
Combo3.AddItem "2"
Combo3.AddItem "3"

else
Combo3.Clear
Combo3.AddItem "2"
Combo3.AddItem "5"
Combo3.AddItem "9"
end if

怎么可能呢,代码测试都通过了呀,仔细检查一下控件名吧

我就粘了这些代码 其他还多着呢 ELSE不行的

那就说明白点,大家也好想想办法