发布网友 发布时间:2022-05-26 07:05
共1个回答
热心网友 时间:2023-10-05 10:30
.版本 2
.支持库 iext
.子程序 _按钮1_被单击
.局部变量 i, 整数型
.判断开始 (编辑框1.内容 = “” 或 编辑框2.内容 = “” 或 编辑框3.内容 = “” 或 编辑框4.内容 = “”)
信息框 (“请填写完整!”, 0, )
返回 ()
.默认
.判断结束
.计次循环首 (超级列表框1.取表项数 (), i)
.判断开始 (超级列表框1.取标题 (i - 1, 0) = 编辑框1.内容)
信息框 (“有重复1!”, 0, )
返回 ()
.默认
.判断结束
.判断开始 (超级列表框1.取标题 (i - 1, 1) = 编辑框2.内容)
信息框 (“有重复2!”, 0, )
返回 ()
.默认
.判断结束
.判断开始 (超级列表框1.取标题 (i - 1, 2) = 编辑框3.内容)
信息框 (“有重复3!”, 0, )
返回 ()
.默认
.判断结束
.判断开始 (超级列表框1.取标题 (i - 1, 3) = 编辑框4.内容)
信息框 (“有重复4!”, 0, )
返回 ()
.默认
.判断结束
.计次循环尾 ()
超级列表框1.插入表项 (-1, 编辑框1.内容, , , , 0)
超级列表框1.置标题 (超级列表框1.取表项数 () - 1, 1, 编辑框2.内容)
超级列表框1.置标题 (超级列表框1.取表项数 () - 1, 2, 编辑框3.内容)
超级列表框1.置标题 (超级列表框1.取表项数 () - 1, 3, 编辑框4.内容)
第二个问题我暂时想不出来方法了。