史上最简单的sqlite数据库学习例程

247855554

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
sql库	Sqlite数据库
sql表	Sqlite表
sql记录集	Sqlite记录集
sql字段	Sqlite字段信息	3
超级列表框选中内容	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

sql库.打开 (取运行目录 () ＋ “\txl”, 真)
sql字段 [1].名称 ＝ “id”
sql字段 [1].类型 ＝ -1
sql字段 [2].名称 ＝ “xm”
sql字段 [2].类型 ＝ #文本型
sql字段 [2].最大文本长度 ＝ 65535
sql字段 [3].名称 ＝ “dh”
sql字段 [3].类型 ＝ #文本型
sql字段 [3].最大文本长度 ＝ 65535
sql库.创建表 (“e2ee”, sql字段)
查询全部 ()

子程序名	返回值类型	公开	备 注
_按钮1_被单击

sql库.打开 (取运行目录 () ＋ “\txl”, 假)
如果真 (sql表.打开 (“e2ee”, sql库) ＝ 假)
信息框 (“打开表失败”, 0, , )

sql表.插入 ()
sql表.写字段值 (“xm”, 编辑框1.内容)
sql表.写字段值 (“dh”, 编辑框2.内容)
sql表.提交 ()
sql表.关闭 ()
sql库.关闭 ()
查询全部 ()

子程序名	返回值类型	公开	备 注
查询全部

变量名	类 型	静态	数组	备 注
i	整数型

sql库.打开 (取运行目录 () ＋ “\txl”, 假)
如果真 (sql表.打开 (“e2ee”, sql库) ＝ 假)
信息框 (“打开表失败”, 0, , )

超级列表框1.全部删除 ()
计次循环首 (sql表.取记录个数 (), i)
sql表.跳到 (i)
i ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (i, 0, 到文本 (sql表.读字段整数值 (“id”, )))
超级列表框1.置标题 (i, 1, sql表.读字段文本值 (“xm”, ))
超级列表框1.置标题 (i, 2, sql表.读字段文本值 (“dh”, ))
计次循环尾 ()
sql表.关闭 ()
sql库.关闭 ()

子程序名	返回值类型	公开	备 注
_按钮2_被单击

sql库.打开 (取运行目录 () ＋ “\txl”, 假)
如果真 (sql表.打开 (“e2ee”, sql库) ＝ 假)
信息框 (“打开表失败”, 0, , )

sql表.查找 (“id=” ＋ 超级列表框选中内容)
sql表.编辑 ()
sql表.写字段值 (“xm”, 编辑框1.内容)
sql表.写字段值 (“dh”, 编辑框2.内容)
sql表.提交 ()
sql表.关闭 ()
sql库.关闭 ()
查询全部 ()

子程序名	返回值类型	公开	备 注
_超级列表框1_左键单击表项

超级列表框选中内容 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 0)
调试输出 (超级列表框选中内容)

子程序名	返回值类型	公开	备 注
_按钮3_被单击

sql库.打开 (取运行目录 () ＋ “\txl”, 假)
如果真 (sql表.打开 (“e2ee”, sql库) ＝ 假)
信息框 (“打开表失败”, 0, , )

sql表.查找 (“id=” ＋ 超级列表框选中内容)
sql表.删除 ()
sql表.提交 ()
sql表.关闭 ()
sql库.关闭 ()
查询全部 ()

子程序名	返回值类型	公开	备 注
_按钮4_被单击

变量名	类 型	静态	数组	备 注
i	整数型
查找的ID	整数型
查找的姓名	文本型
查找的电话	文本型

sql库.打开 (取运行目录 () ＋ “\txl”, 假)
如果真 (sql表.打开 (“e2ee”, sql库) ＝ 假)
信息框 (“打开表失败”, 0, , )

计次循环首 (sql表.取记录个数 (), i)
sql表.跳到 (i)
查找的ID ＝ sql表.读字段整数值 (“id”, )
查找的姓名 ＝ sql表.读字段文本值 (“xm”, )
查找的电话 ＝ sql表.读字段文本值 (“dh”, )
如果真 (查找的姓名 ＝ 编辑框3.内容)
标签1.标题 ＝ 到文本 (查找的ID)
标签2.标题 ＝ 查找的姓名
标签3.标题 ＝ 查找的电话
跳出循环 ()

如果真 (查找的电话 ＝ 编辑框3.内容)
标签1.标题 ＝ 到文本 (查找的ID)
标签2.标题 ＝ 查找的姓名
标签3.标题 ＝ 查找的电话
跳出循环 ()

计次循环尾 ()
sql表.关闭 ()
sql库.关闭 ()

子程序名	返回值类型	公开	备 注
_编辑框1_鼠标左键被按下	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

编辑框1.内容 ＝ “”

子程序名	返回值类型	公开	备 注
_编辑框2_鼠标左键被按下	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

编辑框2.内容 ＝ “”

子程序名	返回值类型	公开	备 注
_编辑框3_鼠标左键被按下	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

编辑框3.内容 ＝ “”

i支持库列表	支持库注释
sqlite3	(未知支持库)
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 sqlite3<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 sql库, Sqlite数据库<br /> .程序集变量 sql表, Sqlite表<br /> .程序集变量 sql记录集, Sqlite记录集<br /> .程序集变量 sql字段, Sqlite字段信息, , "3"<br /> .程序集变量 超级列表框选中内容, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> sql库.打开 (取运行目录 () ＋ “\txl”, 真)<br /> <br /> sql字段 [1].名称 ＝ “id”<br /> sql字段 [1].类型 ＝ -1<br /> <br /> sql字段 [2].名称 ＝ “xm”<br /> sql字段 [2].类型 ＝ #文本型<br /> sql字段 [2].最大文本长度 ＝ 65535<br /> <br /> sql字段 [3].名称 ＝ “dh”<br /> sql字段 [3].类型 ＝ #文本型<br /> sql字段 [3].最大文本长度 ＝ 65535<br /> <br /> sql库.创建表 (“e2ee”, sql字段)<br /> 查询全部 ()<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> sql库.打开 (取运行目录 () ＋ “\txl”, 假)<br /> .如果真 (sql表.打开 (“e2ee”, sql库) ＝ 假)<br />     信息框 (“打开表失败”, 0, , )<br /> .如果真结束<br /> <br /> sql表.插入 ()<br /> sql表.写字段值 (“xm”, 编辑框1.内容)<br /> sql表.写字段值 (“dh”, 编辑框2.内容)<br /> sql表.提交 ()<br /> <br /> <br /> <br /> sql表.关闭 ()<br /> sql库.关闭 ()<br /> 查询全部 ()<br /> <br /> .子程序 查询全部<br /> .局部变量 i, 整数型<br /> <br /> sql库.打开 (取运行目录 () ＋ “\txl”, 假)<br /> .如果真 (sql表.打开 (“e2ee”, sql库) ＝ 假)<br />     信息框 (“打开表失败”, 0, , )<br /> .如果真结束<br /> <br /> 超级列表框1.全部删除 ()<br /> <br /> .计次循环首 (sql表.取记录个数 (), i)<br />     sql表.跳到 (i)<br />     i ＝ 超级列表框1.插入表项 (, , , , , )<br /> <br /> <br />     超级列表框1.置标题 (i, 0, 到文本 (sql表.读字段整数值 (“id”, )))<br />     超级列表框1.置标题 (i, 1, sql表.读字段文本值 (“xm”, ))<br />     超级列表框1.置标题 (i, 2, sql表.读字段文本值 (“dh”, ))<br /> .计次循环尾 ()<br /> <br /> <br /> <br /> <br /> sql表.关闭 ()<br /> sql库.关闭 ()<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> sql库.打开 (取运行目录 () ＋ “\txl”, 假)<br /> .如果真 (sql表.打开 (“e2ee”, sql库) ＝ 假)<br />     信息框 (“打开表失败”, 0, , )<br /> .如果真结束<br /> <br /> sql表.查找 (“id=” ＋ 超级列表框选中内容)<br /> sql表.编辑 ()<br /> sql表.写字段值 (“xm”, 编辑框1.内容)<br /> <br /> <br /> sql表.写字段值 (“dh”, 编辑框2.内容)<br /> <br /> <br /> sql表.提交 ()<br /> sql表.关闭 ()<br /> sql库.关闭 ()<br /> <br /> <br /> 查询全部 ()<br /> <br /> <br /> <br /> <br /> <br /> .子程序 _超级列表框1_左键单击表项<br /> <br /> 超级列表框选中内容 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 0)<br /> 调试输出 (超级列表框选中内容)<br /> <br /> <br /> .子程序 _按钮3_被单击<br /> <br /> sql库.打开 (取运行目录 () ＋ “\txl”, 假)<br /> .如果真 (sql表.打开 (“e2ee”, sql库) ＝ 假)<br />     信息框 (“打开表失败”, 0, , )<br /> .如果真结束<br /> <br /> <br /> sql表.查找 (“id=” ＋ 超级列表框选中内容)<br /> <br /> sql表.删除 ()<br /> <br /> <br /> <br /> <br /> <br /> <br /> sql表.提交 ()<br /> sql表.关闭 ()<br /> sql库.关闭 ()<br /> <br /> <br /> 查询全部 ()<br /> <br /> <br /> .子程序 _按钮4_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 查找的ID, 整数型<br /> .局部变量 查找的姓名, 文本型<br /> .局部变量 查找的电话, 文本型<br /> <br /> sql库.打开 (取运行目录 () ＋ “\txl”, 假)<br /> .如果真 (sql表.打开 (“e2ee”, sql库) ＝ 假)<br />     信息框 (“打开表失败”, 0, , )<br /> .如果真结束<br /> <br /> <br /> <br /> .计次循环首 (sql表.取记录个数 (), i)<br />     sql表.跳到 (i)<br />     查找的ID ＝ sql表.读字段整数值 (“id”, )<br />     查找的姓名 ＝ sql表.读字段文本值 (“xm”, )<br />     查找的电话 ＝ sql表.读字段文本值 (“dh”, )<br /> <br />     .如果真 (查找的姓名 ＝ 编辑框3.内容)<br /> <br />         标签1.标题 ＝ 到文本 (查找的ID)<br />         标签2.标题 ＝ 查找的姓名<br />         标签3.标题 ＝ 查找的电话<br />         跳出循环 ()<br /> <br /> <br />     .如果真结束<br /> <br />     .如果真 (查找的电话 ＝ 编辑框3.内容)<br /> <br />         标签1.标题 ＝ 到文本 (查找的ID)<br />         标签2.标题 ＝ 查找的姓名<br />         标签3.标题 ＝ 查找的电话<br />         跳出循环 ()<br /> <br />     .如果真结束<br /> <br /> <br /> <br /> <br /> .计次循环尾 ()<br /> <br /> <br /> <br /> <br /> sql表.关闭 ()<br /> sql库.关闭 ()<br /> <br /> <br /> <br /> .子程序 _编辑框1_鼠标左键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 编辑框1.内容 ＝ “”<br /> <br /> <br /> .子程序 _编辑框2_鼠标左键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 编辑框2.内容 ＝ “”<br /> <br /> <br /> .子程序 _编辑框3_鼠标左键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 编辑框3.内容 ＝ “”

lhh8426

感谢大佬分享

SMTHU

66666666666666666666

SMTHU

6666666666666666666666666

蒙顺童

支持开源~！感谢分享

zifeiyu

666666666666666666

就是你了

我来水一个哈哈哈哈哈哈

31985322

我来水一个哈哈哈哈哈哈

31985322

asdsad asdas d

247855554

dongqiwei1 发表于 2023-1-13 09:24
嘻嘻嘻啊啊啊啊啊啊啊

新年快乐