求助一个算法问题

1068092013

.版本 2

.子程序 _按钮1_被单击
.局部变量 数组A, 文本型, , "0"
.局部变量 数组B, 文本型, , "0"
.局部变量 数组_计次, 整数型, , "24"
.局部变量 数组_A文本, 文本型, , "24"
.局部变量 数组_B文本, 文本型, , "24"
.局部变量 数组_总文本, 文本型, , "24"
.局部变量 a, 整数型

数组A ＝ 分割文本 (编辑框1.内容, “ ”, )
数组B ＝ 分割文本 (编辑框2.内容, “ ”, )

.计次循环首 (2, 数组_计次 [1])
    .如果真 (数组_计次 [1] ＝ 1)  ' 代表a数组
        数组_A文本 [1] ＝ 数组A [1]
        数组_总文本 [1] ＝ 数组A [1]
    .如果真结束
    .如果真 (数组_计次 [1] ＝ 2)  ' 代表b数组
        数组_B文本 [1] ＝ 数组B [1]
        数组_总文本 [1] ＝ 数组B [1]
    .如果真结束
    .如果真 (取数组成员数 (数组A) ≥ 2)
        .计次循环首 (取数组成员数 (数组A) － 1, a)
            .计次循环首 (2, 数组_计次 [a ＋ 1])  ' 2个数字
                .如果真 (数组_计次 [a ＋ 1] ＝ 1)  ' 代表a数组
                    数组_A文本 [a ＋ 1] ＝ 数组_A文本 [a] ＋ 数组A [a ＋ 1]
                    数组_总文本 [a ＋ 1] ＝ 数组_总文本 [a] ＋ 数组A [a ＋ 1]
                .如果真结束
                .如果真 (数组_计次 [a ＋ 1] ＝ 2)  ' 代表b数组
                    数组_B文本 [a ＋ 1] ＝ 数组_B文本 [a] ＋ 数组B [a ＋ 1]
                    数组_总文本 [a ＋ 1] ＝ 数组_总文本 [a] ＋ 数组B [a ＋ 1]
                .如果真结束
                编辑框3.内容 ＝ 编辑框3.内容 ＋ #换行符 ＋ 数组_总文本 [a ＋ 1]

            .计次循环尾 ()

        .计次循环尾 ()



    .如果真结束

.计次循环尾 ()

2个

这是两个很正常
但是
这就错了
有没有大神帮我改一下改成能够遍历出所有可能
感谢