INPUTBOX
Publicado por ANTONIO (62 intervenciones) el 13/02/2002 19:14:52
¿ COMO PODRIA PRESCINDIR DEL CUADRO DEL INPUTBOX,PARA QUE LA INFORMACION QUE SE INTRODUCE EN ÉL PARA BUSCAR EL REGISTRO.........SE REALICE A TRAVES DE UN TEXTBOX CON LA PROPIEDAD CHANGE????
MENSAJE$ = "INTRODUZCA EL DATO PARA LA BUSQUEDA"
Searchtr$ = InputBox(MENSAJE$, " BUSQUEDA")
Data1.Recordset.Index = "CODIGO"
Data1.Recordset.Seek "=", Searchtr$
If Data1.Recordset.NoMatch Then
Data1.Recordset.MoveFirst
End If
GRACIAS.
MENSAJE$ = "INTRODUZCA EL DATO PARA LA BUSQUEDA"
Searchtr$ = InputBox(MENSAJE$, " BUSQUEDA")
Data1.Recordset.Index = "CODIGO"
Data1.Recordset.Seek "=", Searchtr$
If Data1.Recordset.NoMatch Then
Data1.Recordset.MoveFirst
End If
GRACIAS.
Valora esta pregunta
0