怎么样在combo的 style是2时，给他的text属性来赋值？

我希望用户只能在我给的范围内来选择，所以就把combo的属性设成了2，可是这样的话就不能够给它的text属性来赋值,如果设成1的话就可以，可是这不是我希望的啊？哪位高手有好的方法啊？？？、
谢谢

解决方案 »

  1.   

    Style=2的时候更本没有文本框
    怎么赋值
      

  2.   

    1. 得到文本的索引
    2. 如 zyl910(910：分儿，我来了！)所说：Combo1.ListIndex=索引
      

  3.   

    Combo1.Text=Combo1.List(Combo1.ListIndex)
      

  4.   

    用Combo1.ListIndex定位，从0开始，-1无选择！
      

  5.   


    Private Sub Command1_Click()
    Combo1.Text = Combo1.List(3)
    End SubPrivate Sub Form_Load()
    For i = 1 To 10
    Combo1.AddItem i
    Next
    Combo1.Text = Combo1.List(9)
    End Sub
      

  6.   

    经过我的反复实验，发现如果要在style=2时给combo1.text赋值，那个值一定要在它的列表中，否则就会出错，说.text属性是readonly的