verificar dato en tabla

[juancho24]

Hola Amigos del foro

necesito de su ayuda nuevamente, espero me puedan ayudar

mi consulta es como puedo comprobar en visual basic 6 si un dato ingresado en un textbox ya existe en los registros de una tabla en access 2000, por favor es urgente

ayudenme porfavor

gracias a todos

saludos

[shadowGT]

Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyDown Then
b = UCase(Text2.Text)
Adodc2.RecordSource = "Select * From Inventario where codigo ='" & b & "'"
Adodc2.Refresh

If Text4.Text = "" Then
MsgBox "Codigo Invalido,No Existe", vbCritical + vbOKOnly, "Error"
Text2.Text = ""
Text2.SetFocus
Else
End If
End If
End Sub


Espero te sirva solo cambia el nombre del text y este codigo funciona en el evento KeyDown del control textbox