- Yo lo hago de la siguiente manera :
- Imaginate que la tabal se llama, Facturas, y dentro de la tabla esta el campo Codigo.
- Primero, en el Formulario, tenemos el Data1, con el cual nos conectamos a la tabla, pues bien, a trabajar :
' Al hacer click en el boton que tu quieras, ponemos lo siguiente.
data1.recordsource = "SELECT Facturas.Codigo From Facturas WHERE Facturas.Codigo = " & text1.text
data1.refres
if data1.recordset.recordcount = 0 then
msgbox "El numero de Factura no Exites",vbinformation
else
msgbox "El numero de Factura Existe",vbinformation
end if
- Espero que te sea de ayuda, Hasta luego.
