PESQUISA COMBO

IRENKO 04/12/2006 16:40:18
#187907
Pessoal, tenho um combobox onde carrego alguns dados. Quando digito (COMPANHIA) ele posiciona em tudo começado por (COMPANHIA), até ai tudo bem. Agora tem jeito se eu digitar somente CST ele me retornar conforme abaixo:

COMPANHIA SIDERÃÅ¡RGICA DE TUBARÃO - CST
USUARIO.EXCLUIDOS 04/12/2006 17:01:52
#187914
Cara, ter até tem, mas acho que a única forma seria vc digitar isso fora do combo (num textbox) e usar o código:

Private Sub Text1_Change()
Dim i As Integer
For i = 0 To Combo1.ListCount - 1
  If Combo1.List(i) Like "*" & Text1 & "*" Then
    Combo1.ListIndex = i
    Exit For
  End If
Next i
End Sub


Vou ver se consigo de outra forma, qualquer dúvida poste...flw
IRENKO 04/12/2006 17:13:02
#187919
Eu testei a sua dica, mas não esta buscando!
JACKSONVB 04/12/2006 17:21:56
#187924
cara...
naum sei se vai t ajuda...
mas coloqi em anexo a i uma ocx q eu fiz pra autocomplementa na text um item de uma lista....
v se t serve....

vlw... grande abraço..
Tópico encerrado , respostas não são mais permitidas
Voltar