請問將combobox索引為1.2.3的text. 顯示在text文本框中.

解决方案 »

  1.   

    Private Sub Form_Load()
    Text1.Text = ""
    Combo1.AddItem "i "
    Combo1.AddItem "love "
    Combo1.AddItem "you "
    Combo1.AddItem "do you love me "
    For i = 0 To 2
    Text1.Text = Text1.Text + Combo1.List(i)
    Next
    End Sub
      

  2.   

    不是啊! 我的combobox已經有兩10個index. 都有了文字.
    我想直接提取combobox index=1.4.6三個索引的字符串.顯示在text中
      

  3.   

    哦.原來就是用text1.text=combobox.list(1) & combobox.list(4)...搞定了.
    謝謝pbt.
      

  4.   

    Private Sub Command1_Click()
    Text1.Text = Text1.Text + Combo1.List(1) + Combo1.List(4) + Combo1.List(6)
    End Sub