|
超列去重 | 整数型 | |
|
超级列表框 | 超级列表框 | | | |
指定列作重复此较 | 整数型 | | | | 要相加合并的列_数组 | 整数型 | | | | 只去重复项_不相加合并列 | 整数型 | | | | 置表项数值_标记重复项用 | 整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
n | 整数型 | | |
要比较标题 | 文本型 | | |
m | 整数型 | | |
合并列数c | 整数型 | | 0 |
表项数 | 整数型 | | |
x | 整数型 | | |
a | 整数型 | | |
b | 整数型 | | |
c | 整数型 | | |
指定列 | 整数型 | | |
不合并 | 整数型 | | |
k | 整数型 | | |
置标记 | 整数型 | | |
指定列 = 指定列作重复此较
置标记 = 置表项数值_标记重复项用
如果 (是否为空 (置表项数值_标记重复项用
))

置标记 = -888888888

置标记 = 置表项数值_标记重复项用

不合并 = 只去重复项_不相加合并列
合并列数c = 要相加合并的列_数组
表项数 = 超级列表框.
取表项数 ()
计次循环首 (表项数, n
)
a = n - 1

要比较标题 = 超级列表框.
取标题 (a, 指定列
)
如果 (超级列表框.
取表项数值 (a
) ≠ 0
)
到循环尾 ()



计次循环首 (表项数 - n, m
)

b = n + m - 1


如果 (超级列表框.
取表项数值 (b
) ≠ 0
)

到循环尾 ()


如果真 (超级列表框.
取标题 (b, 指定列
) = 要比较标题
)


超级列表框.
置表项数值 (b, 置标记
)


如果真 (不合并 > 0
)



计次循环首 (取数组成员数 (合并列数c
), x
)




超级列表框.
置标题 (a, 合并列数c
[x
],
到文本 (到数值 (超级列表框.
取标题 (a, 合并列数c
[x
])) +
到数值 (超级列表框.
取标题 (b, 合并列数c
[x
]))
))




计次循环尾 ()










计次循环尾 ()

计次循环尾 ()
计次循环首 (表项数, n
)
c = 表项数 - n

如果真 (超级列表框.
取表项数值 (c
) = 置标记
)

超级列表框.
删除表项 (c
)

计次循环尾 ()返回 (超级列表框.
取表项数 () - 表项数
)|
超列保存 | | |
|
超列 | 超级列表框 | | | |
保存路径 | 文本型 | | | | 行分割 | 文本型 | | | | 列分割 | 文本型 | | | | 输出表列头 | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
S | 文本型 | | |
C | 文本型 | | |
Lstr | 文本型 | | |
I | 整数型 | | |
X | 整数型 | | |
文件号 | 整数型 | | |
如果真 (保存路径 =
“”)
保存路径 =
取运行目录 () +
“\炒鸡列表框.txt”
如果真 (行分割 =
“”)
行分割 =
到文本 ( #换行符 )
如果真 (列分割 =
“”)
列分割 =
“,”
如果真 (输出表列头 =
真)
计次循环首 (超列.
取列数 (), I
)

Lstr = Lstr + 超列.
取列标题 (I - 1
) + 列分割

计次循环尾 ()
Lstr =
取文本中间 (Lstr, 1,
取文本长度 (Lstr
) -
取文本长度 (列分割
)) + 行分割

计次循环首 (超列.
取表项数 (), I
)
计次循环首 (超列.
取列数 (), X
)

S = S + 超列.
取标题 (I - 1, X - 1
) + 列分割

计次循环尾 ()
S =
取文本中间 (S, 1,
取文本长度 (S
) -
取文本长度 (列分割
))

C = C + S + 行分割

S =
“”
计次循环尾 ()文件号 =
打开文件 (保存路径, 4,
)
如果真 (文件号 > 0
)
写出文本 (文件号, Lstr + C
)关闭文件 (文件号)|
超列读取 | | |
|
超列 | 超级列表框 | | | |
读取文件 | 文本型 | | | | 行分割 | 文本型 | | | | 列分割 | 文本型 | | | | 存在表列头 | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
S | 文本型 | | 0 |
C | 文本型 | | 0 |
Code | 文本型 | | |
L | 整数型 | | |
I | 整数型 | | |
X | 整数型 | | |
文件号 | 整数型 | | |
如果真 (读取文件 =
“”)
读取文件 =
取运行目录 () +
“\炒鸡列表框.txt”
如果真 (行分割 =
“”)
行分割 =
到文本 ( #换行符 )
如果真 (列分割 =
“”)
列分割 =
“,”
文件号 =
打开文件 (读取文件, 1,
)Code =
读入文本 (文件号,
)
如果真 (寻找文本 (Code, 列分割, ,
假) < 0
)
返回 ()
S =
分割文本 (Code, 行分割,
)
如果真 (存在表列头 =
真 且 取数组成员数 (S
) > 0
)
删除成员 (S, 1,
) 
计次循环首 (取数组成员数 (S
), I
)
如果真 (寻找文本 (S
[I
], 列分割, ,
假) > 0
)

C =
分割文本 (S
[I
], 列分割,
)

如果真 (取数组成员数 (C
) > 0
)


L = 超列.
取表项数 ()


超列.
插入表项 (, C
[1
], , , ,
)


计次循环首 (取数组成员数 (C
) - 1, X
)



超列.
置标题 (L, X, C
[X + 1
])


计次循环尾 ()




计次循环尾 ()
如果 (检查框判断 =
假)
计次循环首 (超列.
取表项数 (), I
)

超列.
选择表项 (I - 1
)
计次循环尾 ()
计次循环首 (超列.
取表项数 (), I
)
超列.
置状态图片 (I - 1, 1
)
计次循环尾 ()超列.进入编辑 (1)
如果 (检查框判断 =
假)
计次循环首 (超列.
取表项数 (), I
)

超列.
取消表项选择 (I - 1
)
计次循环尾 ()
计次循环首 (超列.
取表项数 (), I
)
超列.
置状态图片 (I - 1, 0
)
计次循环尾 ()超列.进入编辑 (1)
计次循环首 (超列.
取表项数 (), I
)
如果 (检查框判断 =
假)

如果 (超列.
是否被选择 (I - 1
) =
真)


超列.
取消表项选择 (I - 1
)


超列.
选择表项 (I - 1
)




如果 (超列.
取当前状态图片 (I - 1
) = 1
)


超列.
置状态图片 (I - 1, 0
)


超列.
置状态图片 (I - 1, 1
)




计次循环尾 ()超列.
进入编辑 (1
)|
超列复制选中 | | |
|
超列 | 超级列表框 | | | |
指定列 | 文本型 | | | | 行分割 | 文本型 | | | | 列分割 | 文本型 | | | | 检查框判断 | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
C | 文本型 | | 0 |
I | 整数型 | | |
X | 整数型 | | |
S | 文本型 | | |
G | 文本型 | | |
如果真 (行分割 =
“”)
行分割 =
到文本 ( #换行符 )
如果真 (列分割 =
“”)
列分割 =
字符 (9
)
如果 (指定列 =
“”)
计次循环首 (超列.
取表项数 (), I
)

如果 (检查框判断 =
假)


如果真 (超列.
是否被选择 (I - 1
) =
真)



计次循环首 (超列.
取列数 (), X
)




S = S + 超列.
取标题 (I - 1, X
) + 列分割




计次循环尾 ()



S =
取文本中间 (S, 1,
取文本长度 (S
) -
取文本长度 (列分割
))




G = G + S + 行分割




S =
“”






如果真 (超列.
取当前状态图片 (I - 1
) = 1
) 


计次循环首 (超列.
取列数 (), X
)



S = S + 超列.
取标题 (I - 1, X
) + 列分割



计次循环尾 ()


S =
取文本中间 (S, 1,
取文本长度 (S
) -
取文本长度 (列分割
))



G = G + S + 行分割



S =
“”






计次循环尾 ()

指定列 =
“,” + 指定列 +
“,”
计次循环首 (超列.
取表项数 (), I
)

如果 (检查框判断 =
假)


如果真 (超列.
是否被选择 (I - 1
) =
真)



计次循环首 (超列.
取列数 (), X
)




如果真 (寻找文本 (指定列,
“,” +
到文本 (X
) +
“,”, ,
假) > 0
)





S = S + 超列.
取标题 (I - 1, X
) + 列分割










计次循环尾 ()



S =
取文本中间 (S, 1,
取文本长度 (S
) -
取文本长度 (列分割
))




G = G + S + 行分割




S =
“”






如果真 (超列.
取当前状态图片 (I - 1
) = 1
) 


计次循环首 (超列.
取列数 (), X
)



如果真 (寻找文本 (指定列,
“,” +
到文本 (X
) +
“,”, ,
假) > 0
)




S = S + 超列.
取标题 (I - 1, X
) + 列分割








计次循环尾 ()


S =
取文本中间 (S, 1,
取文本长度 (S
) -
取文本长度 (列分割
))



G = G + S + 行分割



S =
“”






计次循环尾 ()置剪辑板文本 (G)
如果 (检查框判断 =
假)
变量循环首 (超列.
取表项数 () - 1, 0, -1, I
)

如果 (超列.
是否被选择 (I
) =
真)


超列.
删除表项 (I
)









变量循环尾 ()

变量循环首 (超列.
取表项数 () - 1, 0, -1, I
)
如果 (超列.
取当前状态图片 (I - 1
) = 1
) 

超列.
删除表项 (I
)





变量循环尾 ()
|
超列查找 | | |
|
超列 | 超级列表框 | | | |
欲查找内容 | 文本型 | | | | 指定列 | 文本型 | | | | 返回索引 | 整数型 | | | | 起始行 | 整数型 | | | | 结束行 | 整数型 | | | | 全字匹配 | 逻辑型 | | | | 区分大小写 | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
C | 文本型 | | 0 |
I | 整数型 | | |
X | 整数型 | | |
S | 文本型 | | |
G | 文本型 | | |
Idx | 整数型 | | 0 |
如果真 (起始行 > 结束行
)
返回 ()
如果真 (结束行 = 0
)
结束行 = 超列.
取表项数 ()
如果真 (起始行 > 超列.
取表项数 () 或 结束行 > 超列.
取表项数 ())
返回 ()
如果真 (起始行 = 0
)
起始行 = 1

如果 (指定列 =
“”)
变量循环首 (起始行, 结束行, 1, I
)

计次循环首 (超列.
取列数 (), X
)


如果 (全字匹配 =
假)



如果真 (寻找文本 (超列.
取标题 (I - 1, X
), 欲查找内容, , 区分大小写
) > 0
)




超列.
选择表项 (I - 1
)



加入成员 (Idx, I - 1
)



跳出循环 ()








如果真 (超列.
取标题 (I - 1, X
) = 欲查找内容
)



超列.
选择表项 (I - 1
)


加入成员 (Idx, I - 1
)


跳出循环 ()









计次循环尾 ()
变量循环尾 ()

指定列 =
“,” + 指定列 +
“,”
变量循环首 (起始行, 结束行, 1, I
)

计次循环首 (超列.
取列数 (), X
)


如果真 (寻找文本 (指定列,
“,” +
到文本 (X
) +
“,”, ,
假) > 0
)



如果 (全字匹配 =
假)




如果真 (寻找文本 (超列.
取标题 (I - 1, X
), 欲查找内容, , 区分大小写
) > 0
)





超列.
选择表项 (I - 1
)




加入成员 (Idx, I - 1
)




跳出循环 ()










如果真 (超列.
取标题 (I - 1, X
) = 欲查找内容
)




超列.
选择表项 (I - 1
)



加入成员 (Idx, I - 1
)



跳出循环 ()















计次循环尾 ()
变量循环尾 ()返回索引 = Idx超列.
进入编辑 (1
)|
超列排除 | | |
|
超列 | 超级列表框 | | | |
排除内容 | 文本型 | | | | 指定列数 | 整数型 | | | | 全字匹配 | 逻辑型 | | | | 区分大小写 | 逻辑型 | | | | 起始行 | 整数型 | | | | 结束行 | 整数型 | | | |
如果真 (结束行 = 0
)
结束行 = 超列.
取表项数 ()
如果真 (起始行 > 结束行
)
返回 ()
变量循环首 (起始行, 结束行, 1, I
)
如果 (全字匹配 =
真)

如果 (超列.
取标题 (I, 指定列数
) = 排除内容
)


超列.
选择表项 (I
)


超列.
取消表项选择 (I
)