datacombo如何获得当前选定的序号？

[dofty]

style为2-dbcDropDowmList

当选择了一个，如何获得其在列表中的序号，类似ComboBox的 ListIndex

[txlicenhe]

DataCombo1.index

[neo40]

For i = 0 To Combo1.ListCount
If Combo1.List(i) = Combo1.Text Then
j = i
End If
Next i

其中j就是那个序号

[neo40]

/* 　　　 ■■　　 　　　　　　■■■■■■　　　　　　　　 　 */
/* 　　　　　　　　　■■■　　　　　　　　　■■■■■　　　　　　　　　　 */
/* 　　　　　　　　　　■■■　　　　　　　　　■■■■■　　　　　　　　　 */
/* 　　　　　　　　　　■■■■　　　　　　　■■■■■■■　　　　　　　　 */
/* 　　　　　　　　　　■■■■　　　　　　■■■■■■■■■　　　　　　　 */
/* 　　　　　　　　　　■■■■　　　　　　　■■■■■■■■　　　　　　　 */
/* 　　　　　　　　　　■■■■■　■■■■■■■■■■■■■　　　　　　　 */
/* 　　　　　　　　　　■■■■■■■■■■■■■■■■■　　　　　　　　　 */
/* 　　　　　　　　　　■■■■■■　■■■■■■■■■　　　　　　　　　　 */
/* 　　　　　　　　　■■■■■■■　■■■■■■■■■■　　　　　　　　　 */
/* 　　　　　　　■■■■■■■■　　　　　■■■■■■■■　　　　　　　　 */
/* 　　　　　■■■■■■■■■　　　　■■■■■■■■■■　　　　　　　　 */
/* ■■■■■■■■■■■■■　　　　■■■■■■■■■■　　　　　　　　　 */
/* ■■■■■■■■■■■■■　　　　■■■■■　■■■■　　　　　　　　　 */
/* 　■■■■■■■■■■■■ ■　　　■■■■　■■■■■■■　　　　　　 */
/* 　　■■■■■■■■■■■■■　　　■■■　■■■■■■■■　　　　　　 */
/* 　　　　■■■■　■■■■■　　　　■■■■■■■■■■■■　　　　　　 */
/* 　　　　　　　　　■■■■　　　　■■■■■■■■　　　　　　　　　　　 */
/* 　　　　　　　　■■■■　　　■■■■■■■■■■■　　　　　　　　　　 */
/* 　　　　　　　■■■■■　　　■■■■■■■■■■■■　　　　　　　　　 */
/* 　　　　　■■■■■■■　　　■■■　■■■　　■■■■■■■■■■　　 */
/* 　　　　■■■■■■■■　　　　　　■■■■■■■■■■■■■■■■■　 */
/* 　　■■■■■■■■■■　　　■■■■■■■■■■■■■■■■■■■■■ */
/* 　■■■■■■■■■■■■■■■■■■■■■■■■■■■　　■■■■■■ */
/* 　■■■■■■■　■■■■■■■■■■■■　　■■■■　　　　　　　　　 */
/* 　　■■■■■　　■■■■■■■■■■■■■■■■■■　　　　　　　　　 */
/* 　　■■■■　　　■■■■■　　■■■■■■■■■■　　　　　　　　　　 */
/* 　　　　■■■　　■■　　　　　■■■■■■■■■■■■　　　　　　　　 */
/* 　　　　　■■■■■■　　　　　　　■■■■■■■■■■■■　　　　　　 */
/* 　　　　　　■■■■■■　　　■■■■■■■■　■■■■■■■■　　　　 */
/* 　　　　　　■■■■■■■■■■■■■■■■　　　　■■■■■■　　　　 */
/* 　　　　　　　■■■■■　■■■■■■■　　　　　　　　■■■■■　　　 */
/* 　　　　　　　　■■■■　　　　　　　　　　　　　　　　　■■■■　　　 */
/* 　　　　　　　　　■■■　　　　　　　　　　　　　　　　　　　■■　　　 */
/* 　　　　　　　　　　■■　　　　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　■　　　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　■■■　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　■■■■■　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　■■■■■　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　■■■■■　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　■■■■■■　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　■■■■■■■　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　■■■■■■■　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　■■■■■■■■　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　■■■■■■■　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　■■■■■■■　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　■■■■■■■　　　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　■■■■■■■■■　　　　　　　■　　　　　　　　　　　　　　 */
/* 　　　■■■■■■■■■■■■■　　　　　■■■■■■■　　　　　　　　 */
/* 　　■■■■■■■■■■■■■■■　　　　　■■■■■■■■　　　　　　 */
/* 　■■■■■■■■■■■■■■■■■　　　　■■■■■■■■　　　　　　 */
/* 　■■■■■■■■■■■　■■■■■　　　　　■■■■■■■■　　　　　 */
/* 　■■■■■■■■　　　■■■■■■　　　　　　■■■■■■■　　　　　 */
/* 　■■■■■■　　　　■■■■■■■　　　　　　　　■■■■■　　　　　 */
/* 　■■■■　　　　　■■■■■■■　　　　　　　　　　■■■　　　　　　 */
/* 　　■　　　　　　■■■■■■■　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　■■■■■■■■　　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　■■■■■■■■■■■■■　　　　　　　　　　　　　　　　　 */
/* 　　　　　■■■■■■■■■■■■■■■　　　　　　　　　　　　　　　　 */
/* 　　　　　■■■■■■■■■■■■■■■■　　　　　　　　　　　　　　　 */
/* 　　　　　■■■■■■■■■■■■■■■■　　　　　　　　　　　　　　　 */
/* 　　　　　■■■■■■　　　　　　　■■■　　　　　　　　　　　　　　　 */
/* 　　　　　■■■■　　　　　　　　■■■■　　　　　　　　　　　　　　　 */
/* 　　　　　■■■　　　　　　　　　■■■■　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　　　　　■■■■　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　　　　■■■■■　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　　　　■■■■　　　　　　　　　　　　　　　　 */
/* 　　　　　　　■■■■　　　　■■■■■　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　■■■■■■■■■■■　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　■■■■■■■■■■■　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　■■■■■■■■■　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　■■■■■■■　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　■■■■　　　　　　　　　　　　　　　　　　　 */
/* 　　　　　　　　　　　　　　■　　　　　　　　　　　　　　　　　　　　　 */

[neo40]

你问的是DataCombo呀，那样的话序号就是你所选的那项的记录号
要不

DataCombo1.SelectedItem

这个也能得到你要的序号