.版本 2
.支持庫(kù) sqlite3
.支持庫(kù) spec
.支持庫(kù) iext

.程序集 窗口程序集_啟動(dòng)窗口
.程序集變量 test數(shù)據(jù)庫(kù), Sqlite數(shù)據(jù)庫(kù)
.程序集變量 student表, Sqlite表

.子程序 _按鈕_插入數(shù)據(jù)_被單擊


.如果 (test數(shù)據(jù)庫(kù).打開(kāi) (“E:\易語(yǔ)言\自己做的小軟件\測(cè)試文件\test.db”, 假) ＝ 假)
  信息框 (“打開(kāi)數(shù)據(jù)庫(kù)失??！”, 0, , )
  返回 ()
.否則
  調(diào)試輸出 (“打開(kāi)數(shù)據(jù)庫(kù)成功!”)
.如果結(jié)束

.如果 (student表.打開(kāi) (“student”, test數(shù)據(jù)庫(kù)) ＝ 假)
  信息框 (“打開(kāi)表失??！”, 0, , )
  返回 ()
.否則
  調(diào)試輸出 (“打開(kāi)表成功!”)
.如果結(jié)束

student表.插入 ()
student表.寫(xiě)字段值 (“name”, “張三”)
student表.寫(xiě)字段值 (“age”, 3)
.如果 (student表.提交 ())
  調(diào)試輸出 (“插入表數(shù)據(jù)成功!”)
.否則
  信息框 (“插入表數(shù)據(jù)失敗!”, 0, , )
.如果結(jié)束


.子程序 _按鈕_讀取數(shù)據(jù)_被單擊
.局部變量 i, 整數(shù)型
.局部變量 student_所有記錄, 文本型, , "0"
.局部變量 表項(xiàng)索引, 整數(shù)型

超級(jí)列表框1.全部刪除 ()

.如果真 (test數(shù)據(jù)庫(kù).是否已打開(kāi) () ＝ 假)
  test數(shù)據(jù)庫(kù).打開(kāi) (“E:\易語(yǔ)言\自己做的小軟件\測(cè)試文件\test.db”, 假)
.如果真結(jié)束

.如果真 (student表.是否已打開(kāi) () ＝ 假)
  student表.打開(kāi) (“student”, test數(shù)據(jù)庫(kù))
.如果真結(jié)束

student_所有記錄 ＝ student表.取所有記錄 (假)
調(diào)試輸出 (student_所有記錄)

.計(jì)次循環(huán)首 (student表.取記錄個(gè)數(shù) (), i)
  表項(xiàng)索引 ＝ 超級(jí)列表框1.插入表項(xiàng) (-1, student_所有記錄 [i] [1], , , , )
  超級(jí)列表框1.置標(biāo)題 (表項(xiàng)索引, 1, student_所有記錄 [i] [2])
  超級(jí)列表框1.置標(biāo)題 (表項(xiàng)索引, 2, student_所有記錄 [i] [3])
.計(jì)次循環(huán)尾 ()