cbo问题

Question

Option ExplicitPrivate Sub Command1_Click()
   cbodw.Text = "a"
*************************************************************************
   MsgBox cbodw.ListIndex
就在这里我不会了，应该是2
*************************************************************************
End SubPrivate Sub Form_Load()
  cbodw.AddItem "a"
  cbodw.ItemData(cbodw.NewIndex) = 2
  cbodw.AddItem "b "
  cbodw.ItemData(cbodw.NewIndex) = 3
End Subcbodw里我想输出文本而去求它的索引应该怎么写

Answer 1

第一句中应为  MsgBox cbodw.ListIndex(index)为正确语法，
其它的你说的意思没弄明白，不清楚你到底想做什么。

Answer 2

语法没有错，我的意思是想得到2
而不是-1也就是说我希望当CBO文本框中的文本改变后，能显示正确的listindex