易语言学习记录数据库操作

易语言 2020-08-12 18:55:29

易语言学习记录数据库操作

状态条1.置文本 (0, “状态:正在读入命令列表……”)
列表框_命令列表.清空 ()
.计次循环首 (取记录数 (), 计次)
跳到 (计次)
列表框_命令列表.加入项目 (读 (“命令”), )
.计次循环尾 ()
状态条1.置文本 (0, “状态:读入命令列表完毕”)
状态条1.置文本 (1, “数量:” + 到文本 (列表框_命令列表.取项目数 ()) + “个”)

.如果真 (打开 (取运行目录 () + “\studydb.edb”, “studydb”, , , , , ) = 假)
信息框 (“数据库打开失败,错误信息:” + 取错误信息 () + “,错误代码:” + 到文本 (取错误码 ()), 16, “提示”)

写 (“命令”, 输入文本)
列表框_命令列表.加入项目 (输入文本, )
列表框_命令列表.现行选中项 = 列表框_命令列表.取项目数 () - 1
列表框事件 ()
状态条1.置文本 (0, “状态:添加完毕”)
状态条1.置文本 (1, “数量:” + 到文本 (列表框_命令列表.取项目数 ()) + “个”)