Ola essoal,
Queria uma ajuda nessa quetão
Tenho um programa conectado por meio do controle Data a uma base de dados em access e tenho esse código para efetuar uma pesquisa,mas não sei como fazer para retornar o resultado.Queria que fosse retornado o resultado nos proprios campos do formulario que são "nome" e "idade".
segue o codigo que fiz até agora
Private Sub CmdLocalizar_Click()
Dim sql As String
Dim pesq As Integer
If Data1.Recordset.RecordCount = 0 Then
MsgBox " A lista de dados está vazia!", vbExclamation, "Localizar"
Else
pesq = InputBox(" Insira o código do registro:", "Localizar")
sql = "SELECT * FROM Contatos WHERE [cod] = " & pesq & ""
........................
End If
End Sub
