...Gente...Necesito hacer algo como el "FIND" de algun procesador de textos, la cosa seria asi...
...Recorrer una tabla de una BD y que me presente los datos en textboxes, pero que al primer enter me presente el primer registro que encuentre, y al darle el siguiente enter u otro click en el boton me encuentre el segundo registro y asi sucesivamente... es decir, en un ejemplo de un hotel que me de el nombre del primer cliente que habito el cuarto numero 1234 y que al siguiente enter me de el nombre de la segunda persona que habito ese mismo cuarto
MI CODIGO ES ESTE...
Set db = DBEngine.OpenDatabase("\\192.168.3.1\DBXPLORA1.mdb ", False, False, "MS ACCESs; PWD=estees")
Set rs = db.OpenRecordset("Select * from registros where Available = TRUE and NumCuarto = '" & Text1.Text & "'")
If rs.RecordCount <> 0 Then
rs.movefirst
'DO UNTILL (NO SE QUE PONER PERO NECESITO QUE ME INTERCEPTE EL ENTER PARA MOSTRAR EL NOMBRE DEL CLIENTE)
Text2.Text = rs.Fields("Cliente")
rs.movenext
'LOOP (PARA QUE SIGA BUSCANDO Y ME MUESTRE EL SIGUIENTE CLIENTE)
Else
MsgBox("No hay registro de clientes con ese cuarto")
...Gracias de antemano!
