判断

小羊羊羊|| · 发表于 2023-5-18 14:07:27

图1为列表框1，图2列表框2，左上角为编辑框6，下面编辑框8，左下角有几百个账号格式：（账号----名字）我想判断：编辑框6=列表框1第2列的内容，编辑框8的时间=列表框1第3列的内容
如果上面成立，再判断列表框1第4列的内容=账号
为啥我这样写会丢数据呢

变量名	类型	静态	数组	备注
i	整数型
局_名称	文本型
局_日期	文本型
局_判断1	文本型
局_日期2	文本型
索引	整数型
局_中奖奖品	文本型
局_机器码	文本型
局_中奖人名字	文本型
文本	文本型		0
b	整数型

局_名称＝编辑框6.内容
局_日期＝编辑框8.内容
文本＝分割文本 (编辑框7.内容, #换行符, )
' 调试输出 (文本)

计次循环首 (超级列表框1.取表项数 (), i)

局_判断1 ＝超级列表框1.取标题 (i － 1, 2)

局_日期2 ＝超级列表框1.取标题 (i － 1, 3)

如果真 (局_判断1 ＝局_名称且寻找文本 (局_日期2, 局_日期, , 假) ≠ -1)

局_机器码＝超级列表框1.取标题 (i － 1, 4)

计次循环首 (取数组成员数 (文本), b)

如果真 (局_机器码＝文本_取左边 (文本 [b], “----”, , ))

局_中奖人名字＝文本_取右边 (文本 [b], “----”, , )

局_中奖奖品＝超级列表框1.取标题 (i － 1, 1)

索引＝超级列表框2.插入表项 (, , , , , )

超级列表框2.置标题 (索引, 0, 到文本 (索引＋ 1))

超级列表框2.置标题 (索引, 1, 局_中奖奖品)

超级列表框2.置标题 (索引, 2, 局_中奖人名字)

' 调试输出 (局_机器码, 局_中奖人名字)

. ' 如果真 (局_中奖人名字＝ “约定”)

' 保存文本 (局_中奖奖品＋ “----” ＋局_中奖人名字＋ “----” ＋超级列表框1.取标题 (i － 1, 5), “中奖名单”)

b ＝ 0

跳出循环 ()

计次循环尾 ()

计次循环尾 ()
调试输出 (“已经结束”)

i支持库列表	支持库注释
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br />
.支持库 iext<br />
.支持库 spec<br />
<br />
.局部变量 i, 整数型<br />
.局部变量 局_名称, 文本型<br />
.局部变量 局_日期, 文本型<br />
.局部变量 局_判断1, 文本型<br />
.局部变量 局_日期2, 文本型<br />
.局部变量 索引, 整数型<br />
.局部变量 局_中奖奖品, 文本型<br />
.局部变量 局_机器码, 文本型<br />
.局部变量 局_中奖人名字, 文本型<br />
.局部变量 文本, 文本型, , "0"<br />
.局部变量 b, 整数型<br />
<br />
局_名称 ＝ 编辑框6.内容<br />
局_日期 ＝ 编辑框8.内容<br />
文本 ＝ 分割文本 (编辑框7.内容, #换行符, )<br />
' 调试输出 (文本)<br />
.计次循环首 (超级列表框1.取表项数 (), i)<br />
    局_判断1 ＝ 超级列表框1.取标题 (i － 1, 2)<br />
    局_日期2 ＝ 超级列表框1.取标题 (i － 1, 3)<br />
    .如果真 (局_判断1 ＝ 局_名称 且 寻找文本 (局_日期2, 局_日期, , 假) ≠ -1)<br />
        局_机器码 ＝ 超级列表框1.取标题 (i － 1, 4)<br />
        .计次循环首 (取数组成员数 (文本), b)<br />
            .如果真 (局_机器码 ＝ 文本_取左边 (文本 <strong>, “----”, , ))<br />
                局_中奖人名字 ＝ 文本_取右边 (文本 <strong>, “----”, , )<br />
                局_中奖奖品 ＝ 超级列表框1.取标题 (i － 1, 1)<br />
                索引 ＝ 超级列表框2.插入表项 (, , , , , )<br />
                超级列表框2.置标题 (索引, 0, 到文本 (索引 ＋ 1))<br />
                超级列表框2.置标题 (索引, 1, 局_中奖奖品)<br />
                超级列表框2.置标题 (索引, 2, 局_中奖人名字)<br />
                ' 调试输出 (局_机器码, 局_中奖人名字)<br />
                .' 如果真 (局_中奖人名字 ＝ “约定”)<br />
                    ' 保存文本 (局_中奖奖品 ＋ “----” ＋ 局_中奖人名字 ＋ “----” ＋ 超级列表框1.取标题 (i － 1, 5), “中奖名单”)<br />
                .如果真结束<br />
<br />
                b ＝ 0<br />
                跳出循环 ()<br />
            .如果真结束<br />
<br />
        .计次循环尾 ()<br />
    .如果真结束<br />
<br />
.计次循环尾 ()<br />
调试输出 (“已经结束”)