descartex lo cambie como dijiste pero me marco error, pongo el codigo
Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
Activity.LoadLayout("lucendi_1_3")
bandera1=False
If File.Exists(File.DirInternal,"aparatos.sql") = False Then
File.Copy(File.DirAssets,"aparatos.sql",File.DirInternal,"aparatos.sql")
End If
If sql1.IsInitialized = False Then
sql1.Initialize(File.DirInternal, "aparatos.sql", False)
End If
imagen.Initialize(LoadBitmap(File.DirAssets,"boton sala.png"))
sld.Initialize
puntero.IsInitialized
puntero = sql1.ExecQuery("SELECT * FROM estados")
puntero.Position=1
sld.AddState(sld.State_Disabled,imagen)
End Sub
Sub Button1_Click
Dim estado, texto As String
puntero.Position=0 'el estado que quiero modificar esta en la primera fila con el id 1
estado=puntero.GetString("estado")
id="0"
If etado="off" Then
texto="on"
sql1.ExecNonQuery("UPDATE estados set estado ='"& texto&"' WHERE Id = " & id)
Else
texto="off"
sql1.ExecNonQuery("UPDATE estados set estado ='"& texto&"' WHERE Id = " & id)
End If
end sub