Spanish Buscar y editar los datos de un registro

[23021959Pepe]

Hola, después de tirarme al cuerpo las 32 paginas del Forum, no he encontrado algo que se parezca a lo que necesito y si hay algo parecido, al ser novato en B4A no lo entiendo bien.
Necesito que cuando meto un dato en un EditText y al pulsar el botón "Buscar" me localice en que registro esta y me llene otros EditText con los datos de los otros campos incluidos en el mismo registro.
Lo he intentado mas o menos como se hace en VB6, pero no lo consigo.
Si me podéis echar una mano os lo agradecería.

Saludos

 

[Descartex]

Hola, amigo!!!
Imaginemos q tienes 4 edittext, llamados et1,et2,et3 y et4... el et1 es el q tiene el contenido a buscar, pues haces mas o menos lo siguiente:

Sub Buscar_Click
Dim Cur As cursor
Cur=s.ExecQuery2("SELECT * FROM TABLA WHERE Columna1="&et1.Text)
for i=0 to Cur.RowCount-1
Cur.Position=i
et2.Text=Cur.GetString("Columna2")
et3.Text=Cur.GetString("Columna3")
et4.Text=Cur.GetString("Columna4")
Next
End Sub

Donde "s" es un Sql que apunta a tu Base de Datos SQLite.

Un saludo y espero no haberte liado más ;-)

 

[23021959Pepe]

Gracias Descartex, justo lo que necesitaba.