Auto Completar um TextBox

USUÁRIO: SENHA:

SALVAR LOGIN ?


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Auto Completar um TextBox

Nilton Vianna

AMPARO
SP - BRASIL

Postada em 30/09/2009 21:44 hs

Ola amigos, minha duvida é seguinte

Tenho um textbox tipo txtMaterial.text

Seleciona o texto

Exe: “Laranja”

“Abacate”

“Uva”

“Pêra”

Quando eu for digitar no texto ele automaticamente coloca a palavra.

Digito L ' ai automaticamente entra a palavra Laranja.

Nilton Vianna

AMPARO
SP - BRASIL

Postada em 30/09/2009 22:45 hs

Resolvi.

Private Sub txtNat1_Change()
Dim pos As Long
List1.ListIndex = SendMessage(List1.hWnd, LB_FINDSTRING, -1, ByVal CStr(txtNat1.Text))
If List1.ListIndex = -1 Then
pos = txtNat1.SelStart
Else
pos = txtNat1.SelStart
txtNat1.Text = List1
txtNat1.SelStart = pos
txtNat1.SelLength = Len(txtNat1.Text) - pos
End If
End Sub

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR


		CyberWEB Network Ltda. © Copyright 2000-2025 - Todos os direitos reservados. Powered by HostingZone - A melhor hospedagem para seu site