Estoy trabajando con un formulario con Gambas3 y MySQL para la base de datos. El formulario es para registrar datos de una persona e incluye un textbox donde el usuario debe introducir el nombre de la persona, eso va a una tabla llamada "personas", especificamente a un campo llamado "nombrepers". Ya conseguì hacer la conexión y guardar, pero quiero que el procedimiento "buscar" me permita devolver al formulario los datos de la persona guardada. Y la bùsqueda debo hacerla por el nombre, pero el usuario no siempre sabrà còmo se guardo exactamente ese nombre, por lo que debo usar el operador LIKE. Quisiera que el textbox u otra lista (no se què objeto podrìa usar) hiciera algo como un autocompletado. Es decir que si el usuario introduce la letra "M" en el textbox aparezca una lista con todos los nombres que existan y que comiencen con esa letra, y si sigue escribiendo "Ma" entonces aparezca en la lista solo los que comienzan por esas dos... y asì. He leìdo que debo hacer un bucle, lo intentè pero no lo estoy haciendo bien...Aquí va el código que estoy usando:
Public Sub nombrepersonas_KeyPress()
Dim $strn As String
Dim $regn As Result
Dim $strnom As String
moduloconexion.moduloconexion
$strn = ("Select nombrepers from personas where nombrepers like '" & nombrepersonas.Text & "'")
$regn = moduloconexion.$conexion.Exec($strn)
If ($regn.Count > 0) Then
For $strn = 1 To $regn.Count
$strnom = $regn!nombrepers
ListBox.Add($strnom)
$regn.MoveNext
Next
Endif
moduloconexion.$conexion.close
Por favor, Qué estoy haciendo mal???
dos hermanas, sevilla
