Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
Activity.LoadLayout("culturilla")
If FirstTime = True AND File.Exists(File.DirInternal, "base.db") = False Then
File.Copy(File.DirAssets, "base.db", File.DirInternal, "base.db")
End If
SQL1.Initialize(File.DirInternal, "base.db", True)
la1=SQL1.ExecQuerySingleResult("SELECT pregunta FROM table1 WHERE id=1")
Label1.Text=la1
End Sub