e4a换行_E4A 将sqlite数据库查询展示成表格[源码]

变量 数据库表名 为 文本型

事件 主窗口.创建完毕()

数据库表名 = "mytable"

结束 事件

事件 按钮4.被单击()

如果 文件是否存在(取存储卡路径() & "/mydata.db") = 假 则

创建数据库(取存储卡路径() & "/mydata.db")

弹出提示("创建数据库成功！")

结束 如果

打开数据库(取存储卡路径() & "/mydata.db") '！！！在进行数据库操作前必须先打开数据库

弹出提示("打开数据库成功！")

结束 事件

事件 按钮1.被单击()

如果 数据表是否存在(数据库表名) = 假 则

'数据库执行("CREATE TABLE " & 数据库表名 & " (id text,value text)") '创建数据表,表的结构有两个列,第一列为id,第二列为value

创建数据表(数据库表名,"id text,value text")

'如果要创建自增型id字段,可以这样写 创建数据表(数据库表名,"id integer PRIMARY KEY,value text")

弹出提示("创建数据表成功！")

否则

弹出提示("数据表已存在！")

结束 如果

结束 事件

事件 按钮2.被单击()

'        数据库执行("INSERT INTO