ComboBox - Id do banco de dados

[sacseixas 0]

Ola pessoal!Minha duvida é:Tem como eu pegar o IdCliente do meu banco de dados na minha combobox que aparece o nome do cliente?Ja usuei de colocar no combobox o Id e o nome. (ai sei que da certo, mas acho deselegante)Se eu usar o combobox.listIndex não funciona, pois o indice que ele me retorna e da combo e como o me SELECT esta ordenado os indices mudam.exemplo. Do While Not rsCargo.EOF cboCargo.AddItem rsCargo("dsCargo") cboCargo.ItemData(cboCargo.NewIndex) = CInt(rsCargo("idCargo")) rsCargo.MoveNext LoopPreciso recuperar rsCargo("idCargo")) para carregar as informaçoes no meu outro formulario.Agradeço desde já a atenção de todos

[eriva_br 7]

falai, você pode usar o datacombo (nem precisa fazer loop pra carregar), clica no menu project, depois componentes, dai você escolhe Microsoft Data List Control

 

pra carregar o combo:

Me.dtcCargo.ListField = "dsCargo"	Me.dtcCargo.BoundColumn = "idCargo"	Set Me.dtcCargo.RowSource = rsCargo

as propriedades:

ListField --> definine os campo que será listado

BoundColumn --> define o campo chave, para buscar depois usa a propriedade BoundText

RowSource --> define a fonte de dados

 

pra recuperar o ID você usa a propriedade BoundText

exemplo:

Private Sub Command1_Click()	MsgBox me.dtcCargo.BoundTextEnd Sub

falows

t+

[Luizgrs 0]

Para pegar o ItemData da opçõa escolhida na combo é só fazer assim:

id = cboCargo.itemdata(cboCargo.listindex)