form1上有两个combo,分别是combo1和combo2,combo1的list有三个,比如说是1,2和3,我想实现如果我在combo1中选择1,然后点击combo2时会显示11,12,13,如果我选中2,点击combo2时会显示21,22,23,如果我选3,点击combo2时会显示31,32,33,请问怎么写

解决方案 »

  1.   

    if combo1.text="1" then
       combo2.AddItem "11"
       combo2.AddItem "12"
       combo2.AddItem "13"
    elseif combo2.text="2" then
       combo2.AddItem "21"
       combo2.AddItem "22"
       combo2.AddItem "23"
    else
       combo2.AddItem "31"
       combo2.AddItem "32"
       combo2.AddItem "33"
    end if
       
      

  2.   

    谢谢,可以了,一时间就忘了text了,呵呵
      

  3.   

    楼上的正解,可以简化下Private Sub Combo1_Click()
    Combo2.Clear
    For i = 1 To 3
    Combo2.AddItem Combo1.Text & i
    Next i
    End Sub