|
|
发表于 2026-4-12 22:00:01
|
显示全部楼层
四川省成都市
.版本 2
.支持库 spec
.子程序 __启动窗口_创建完毕
.局部变量 简称数组, 文本型, , "0"
.局部变量 模板数组, 文本型, , "0"
.局部变量 品牌数组, 文本型, , "0"
.局部变量 记录总数, 整数型
.局部变量 品牌, 文本型
.局部变量 简称, 文本型
.局部变量 模板, 文本型
.如果真 (打开 (“jianchen.edb”, , , , , , ) = 假)
信息框 (“打开数据库失败!”, 0, , )
返回 ()
.如果真结束
到首记录 ()
.判断循环首 (尾记录后 () = 假)
简称 = 读 (“简称”)
模板 = 读 (“模板”)
品牌 = 读 (“品牌”)
加入成员 (简称数组, 简称)
调试输出 (简称数组)
加入成员 (模板数组, 模板)
调试输出 (模板数组)
加入成员 (品牌数组, 品牌)
调试输出 (品牌数组)
跳过 ()
处理事件 ()
.判断循环尾 ()
记录总数 = 取数组成员数 (简称数组)
信息框 (“读取完成,共” + 到文本 (记录总数) + “条记录”, 0, , )
关闭 ()
全部关闭 ()
|
|