|
发表于 2016-2-27 11:55:08
|
显示全部楼层
河南省周口市
.版本 2
.支持库 EThread
.如果真 (选择框105.选中 = 真) ' 大小大
.计次循环首 (取数组成员数 (数组), 计次)
Y = 寻找文本 (大号, 取文本中间 (数组 [计次], 1, 1), , 假)
Y1 = 寻找文本 (小号, 取文本中间 (数组 [计次], 2, 1), , 假)
Y2 = 寻找文本 (大号, 取文本中间 (数组 [计次], 3, 1), , 假)
.如果真 (Y ≠ -1 且 Y1 ≠ -1 且 Y2 ≠ -1)
编辑框过程1.内容 = 子文本替换 (编辑框过程1.内容, 数组 [计次] + “ ”, “”, , , 真)
.如果真结束
处理事件 ()
.计次循环尾 ()
.如果真结束
.如果真 (选择框106.选中 = 真) ' 大小小
.计次循环首 (取数组成员数 (数组), 计次)
Y = 寻找文本 (大号, 取文本中间 (数组 [计次], 1, 1), , 假)
Y1 = 寻找文本 (小号, 取文本中间 (数组 [计次], 2, 1), , 假)
Y2 = 寻找文本 (小号, 取文本中间 (数组 [计次], 3, 1), , 假)
.如果真 (Y ≠ -1 且 Y1 ≠ -1 且 Y2 ≠ -1)
编辑框过程1.内容 = 子文本替换 (编辑框过程1.内容, 数组 [计次] + “ ”, “”, , , 真)
.如果真结束
处理事件 ()
.计次循环尾 ()
.如果真结束
.如果真 (选择框107.选中 = 真) ' 小小小
.计次循环首 (取数组成员数 (数组), 计次)
Y = 寻找文本 (小号, 取文本中间 (数组 [计次], 1, 1), , 假)
Y1 = 寻找文本 (小号, 取文本中间 (数组 [计次], 2, 1), , 假)
Y2 = 寻找文本 (小号, 取文本中间 (数组 [计次], 3, 1), , 假)
.如果真 (Y ≠ -1 且 Y1 ≠ -1 且 Y2 ≠ -1)
编辑框过程1.内容 = 子文本替换 (编辑框过程1.内容, 数组 [计次] + “ ”, “”, , , 真)
.如果真结束
处理事件 ()
.计次循环尾 ()
.如果真结束
.如果真 (选择框108.选中 = 真) ' 小小大
.计次循环首 (取数组成员数 (数组), 计次)
Y = 寻找文本 (小号, 取文本中间 (数组 [计次], 1, 1), , 假)
Y1 = 寻找文本 (小号, 取文本中间 (数组 [计次], 2, 1), , 假)
Y2 = 寻找文本 (大号, 取文本中间 (数组 [计次], 3, 1), , 假)
.如果真 (Y ≠ -1 且 Y1 ≠ -1 且 Y2 ≠ -1)
编辑框过程1.内容 = 子文本替换 (编辑框过程1.内容, 数组 [计次] + “ ”, “”, , , 真)
.如果真结束
处理事件 ()
.计次循环尾 ()
.如果真结束
.如果真 (选择框109.选中 = 真) ' 小大小
.计次循环首 (取数组成员数 (数组), 计次)
Y = 寻找文本 (小号, 取文本中间 (数组 [计次], 1, 1), , 假)
Y1 = 寻找文本 (大号, 取文本中间 (数组 [计次], 2, 1), , 假)
Y2 = 寻找文本 (小号, 取文本中间 (数组 [计次], 3, 1), , 假)
.如果真 (Y ≠ -1 且 Y1 ≠ -1 且 Y2 ≠ -1)
编辑框过程1.内容 = 子文本替换 (编辑框过程1.内容, 数组 [计次] + “ ”, “”, , , 真)
.如果真结束
处理事件 ()
.计次循环尾 ()
.如果真结束
.如果真 (选择框110.选中 = 真) ' 小大大
.计次循环首 (取数组成员数 (数组), 计次)
Y = 寻找文本 (小号, 取文本中间 (数组 [计次], 1, 1), , 假)
Y1 = 寻找文本 (大号, 取文本中间 (数组 [计次], 2, 1), , 假)
Y2 = 寻找文本 (大号, 取文本中间 (数组 [计次], 3, 1), , 假)
.如果真 (Y ≠ -1 且 Y1 ≠ -1 且 Y2 ≠ -1)
编辑框过程1.内容 = 子文本替换 (编辑框过程1.内容, 数组 [计次] + “ ”, “”, , , 真)
.如果真结束
处理事件 ()
.计次循环尾 ()
.如果真结束
进度条1.位置 = 80
启动线程 (&奇偶排列, , )
|
|