.如果真 (取文本长度 (编辑框1.内容) ＞ 3 或 取文本长度 (编辑框1.内容) ＝ 3)
.计次循环首 (超级列表框1.取表项数 (), i)
单号 ＝ 超级列表框1.取标题 (i － 1, 0)
条码 ＝ 超级列表框1.取标题 (i － 1, 1)
数量 ＝ 超级列表框1.取标题 (i － 1, 2)
处理事件 ()
.如果真 (单号 ＝ 编辑框1.内容)
重定义数组 (许可证, 真, 取数组成员数 (许可证) ＋ 1)
许可证 [取数组成员数 (许可证)] ＝ 线程_创建许可证 ()
线程_进入许可区 (许可证 [取数组成员数 (许可证)])
播报文本 ＝ 播报文本 ＋ 条码 ＋ “,” ＋ 数量 ＋ “|”
超级列表框1.置标题 (i － 1, 3, “已校验”)
编辑框2.加入文本 (到文本 (时间_格式化 (取现行时间 (), “yyyy-M-d”, “hh:mm:ss”, 真)) ＋ “正在校验库位” ＋ 编辑框1.内容 ＋ “ 条码号” ＋ 条码 ＋ “ 数量” ＋ 数量 ＋ #换行符)
语音 ＝ “正在校验库位” ＋ 编辑框1.内容 ＋ “ 条码号” ＋ 条码 ＋ “ 数量” ＋ 数值到大写 (到整数 (数量), 真)
上一篇 窗口强力万能隐藏工具无模块