1.实现效果
2.注意事项:我们先用SQLiteStudio建表以及表中字段(SQLiteStudio工具可百度下载);写程序之前对支持库进行配置,勾选Sqlite3数据库支持库而不是Sqlite数据库支持库,因为选用后者会出现一些打不开表之类的问题;
3.源码
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
.版本 2 .支持库 sqlite3 .支持库 spec .支持库 iext .程序集 窗口程序集_启动窗口 .程序集变量 test数据库, Sqlite数据库 .程序集变量 student表, Sqlite表 .子程序 _按钮_插入数据_被单击 .如果 (test数据库.打开 (“E:\易语言\自己做的小软件\测试文件\test.db”, 假) = 假) 信息框 (“打开数据库失败!”, 0, , ) 返回 () .否则 调试输出 (“打开数据库成功!”) .如果结束 .如果 (student表.打开 (“student”, test数据库) = 假) 信息框 (“打开表失败!”, 0, , ) 返回 () .否则 调试输出 (“打开表成功!”) .如果结束 student表.插入 () student表.写字段值 (“name”, “张三”) student表.写字段值 (“age”, 3) .如果 (student表.提交 ()) 调试输出 (“插入表数据成功!”) .否则 信息框 (“插入表数据失败!”, 0, , ) .如果结束 .子程序 _按钮_读取数据_被单击 .局部变量 i, 整数型 .局部变量 student_所有记录, 文本型, , "0" .局部变量 表项索引, 整数型 超级列表框1.全部删除 () .如果真 (test数据库.是否已打开 () = 假) test数据库.打开 (“E:\易语言\自己做的小软件\测试文件\test.db”, 假) .如果真结束 .如果真 (student表.是否已打开 () = 假) student表.打开 (“student”, test数据库) .如果真结束 student_所有记录 = student表.取所有记录 (假) 调试输出 (student_所有记录) .计次循环首 (student表.取记录个数 (), i) 表项索引 = 超级列表框1.插入表项 (-1, student_所有记录 [i] [1], , , , ) 超级列表框1.置标题 (表项索引, 1, student_所有记录 [i] [2]) 超级列表框1.置标题 (表项索引, 2, student_所有记录 [i] [3]) .计次循环尾 () |