Logo Hardware.com.br
death_metal
death_metal Membro Senior Registrado
212 Mensagens 1 Curtida

Duvidas em VB (Acesso a Dados)

#1 Por death_metal 10/06/2008 - 12:08
Ola pessoal,

Vejam se podem me ajudar nessa questao.
Tenho no meu form um campo CEP onde ao preenche-lo faria uma busca na tabela onde tem os CEPs,RUAS e BAIRROS assim trazendo esses dados pra seus respectivos campos.Eu que estou precisando é saber quais são os recursos para eu fazer a busca na tabela.
O jeito que eu fiz foi esse mas só me traz o primeiro CEP da tabela.



Private Sub TextCEP_LostFocus()

Data2.Recordset.Index = "IndCodLogradouro"
Data2.Recordset.Seek "=", Data2.Recordset.Fields!CodLogradouro

If Data2.Recordset.NoMatch = False Then
If TextCEP.Text = Data2.Recordset.Fields!Cep Then
TextBairro.Text = Data2.Recordset.Fields!Bairro
TextRua.Text = Data2.Recordset.Fields!Rua
Else
MsgBox " CEP NÃO ENCONTRADO!"
End If
Else
MsgBox " CEP NÃO ENCONTRADO!"
End If

End Sub

© 1999-2024 Hardware.com.br. Todos os direitos reservados.
Imagem do Modal