He seguido (aunque simplificando el ejemplo) el manual de Daniel Calleja Amaro y Razaaztk, que lo podéis descargar en la sección de Manuales de este blog.
El programa puede:
- introducir registros
- editar registros
- borrarlos
- busquedas por distintos los distintos campos eligiéndolos con un combobox (ampliación del manual)
- Operaciones con valores de los campos de registros (en este caso la fecha). (ampliación del manual)
- Uso de un columnview
Enlace de descarga del código fuente del programa.
Enlaces de interés:
Manual de sqlite3 para gambas de Pablo Mileti
Web con un pequeño manual: /mini-tutorial-sqlite-zegaz
Nota:
Durante el video tube problemas con el formato de fecha y calcular la edad.
Davidoso100 me ha dado esta solución:
DIM FechaArray AS String[]
DIM FechaSql AS String
FechaArray = Split(TxtFecha.Text, "/")
FechaSql = FechaArray[1] & "/" & FechaArray[0] & "/" & FechaArray[2]
TxtFecha.Text = FechaSql
y esto para el columnview
Columnview[Clave][1] = Format(hResult["fecha"], "dd/mm/yyyy")
DIM FechaSql AS String
FechaArray = Split(TxtFecha.Text, "/")
FechaSql = FechaArray[1] & "/" & FechaArray[0] & "/" & FechaArray[2]
TxtFecha.Text = FechaSql
y esto para el columnview
Columnview[Clave][1] = Format(hResult["fecha"], "dd/mm/yyyy")