SELECIONAR COMBO ATRAVES DO VALOR DO ITEMDATA

LUIS.FLAVIO 23/02/2011 11:46:01
#366331
Pessoa,

Estou precisando da ajuda de vocês no seguinte item.

Tenho um ComboX que carregas as informações Codigo (ItemData) e o Nome do funcionário desta forma:

Do Until Rs.EOF
objcombo.AddItem Rs.Fields(1)
objcombo.ItemData(objcombo.NewIndex) = CLng(Rs(0))
Rs.MoveNext
Loop

Mas em alguns casos estou precisando selecionar o item do Combo atraves do Codigo que está dentro do ItemData, por exemplo eu passo o Codigo do Funcionario e aparece o nome do Funcionario no combobox.

O cenário é que passo o parametro Codigo e ele seleciona o Nome do Funcionario correspondente ao Codigo passado
MARCELO.TREZE 23/02/2011 12:57:48
#366353


seria assim

For f = 0 To objCombo.ListCount - 1
If objCombo.ItemData(f) = txtCodFun.text Then
objCombo.listIndex = f
End If
Next f

Tópico encerrado , respostas não são mais permitidas