COMBOX
Prezados colega
preciso utilizar a combox na qual assim preciso apresentar o IdProduto ai assim q pessoa selecionar mostro o nome do produto em outro campo.
tentei utilizar o codigo abaixo que ate peguei no site vbmania
porem desta maneira so consigo selecionar pelo o nome do produto ai depois consigo pegar o codigo.
alguem pode me dar uma luz.
preciso utilizar a combox na qual assim preciso apresentar o IdProduto ai assim q pessoa selecionar mostro o nome do produto em outro campo.
tentei utilizar o codigo abaixo que ate peguei no site vbmania
Citação:With rs
Do Until .EOF [ô]percorre o recordset ate o fim
[ô]inclui os itens correspondentes
Controle.AddItem rs(DescricaoCampo)
Controle.ItemData(Controle.NewIndex) = rs(CodigoCampo)
.MoveNext
Loop
[ô]fecha o recordset
.Close
End With
porem desta maneira so consigo selecionar pelo o nome do produto ai depois consigo pegar o codigo.
alguem pode me dar uma luz.
Tentou colocar o Código primeiro em vez de descrição.
Citação::
Tentou colocar o Código primeiro em vez de descrição.
Tentei sim porem da tipo incompativel
Eu, sinceramente não lembro disto de como você postou.
E sim através do valor do combobox faça um pesquisa
e preencha vários textbox.
Olhe, preencha um Listivew ,MSHFlexGrid1 ou Datagrid
ai basta selecionar a linha e todos os valores das células
passarão para os textbox.
Poste seu código de como esta pegando esses valores,
alguém vai ver e analisar e dar uma resposta.
E sim através do valor do combobox faça um pesquisa
e preencha vários textbox.
Olhe, preencha um Listivew ,MSHFlexGrid1 ou Datagrid
ai basta selecionar a linha e todos os valores das células
passarão para os textbox.
Poste seu código de como esta pegando esses valores,
alguém vai ver e analisar e dar uma resposta.
Carrega assim:
E captura assim no click do combo:
Combo1.Clear
For i = 0 To 9
Combo1.AddItem Format$((i * 100), [Ô]0000[Ô]) & [Ô] - Código Teste[Ô], i
Combo1.ItemData(i) = i * 100
Next i
Combo1.ListIndex = 0
E captura assim no click do combo:
MsgBox [Ô]Meu código é [Ô] & Combo1.ItemData(Combo1.ListIndex)
Filman, não condiz com a postagem do autor.
OMAR2011, meu exemplo foi pra carregar o combo que é o que ele não está conseguindo pelo código que passou!
Após ele carregar o combo corretamente, no segundo item que mostrei via msgbox o mesmo vai ter o código no itemdata. Dessa forma ele não precisa trazer o código no display do combo junto com a descrição.
Após ele carregar o combo corretamente, no segundo item que mostrei via msgbox o mesmo vai ter o código no itemdata. Dessa forma ele não precisa trazer o código no display do combo junto com a descrição.
Pelo que eu entendi ele quer carregar a combo com o Id do Produto e ao selecionar um item da combo, mostre a descrição do produto em outro campo, porém o código que ele apresentou não condiz com o que ele quer.
[txt-color=#e80000]Filman não entendeu.[/txt-color]
Do jeito que ele quer nunca vi nenhum post.
Do jeito que ele quer nunca vi nenhum post.
Tópico encerrado , respostas não são mais permitidas