变量名 | 类 型 | 静态 | 数组 | 备 注 |
i | 整数型 | | |
时间参数 | 文本型 | | |
临时数组 | 文本型 | | 0 |
j | 整数型 | | |
最后位置 | 整数型 | | |
未比数据数量 | 整数型 | | |
位置变量 | 整数型 | | |
临时数组1 | 文本型 | | 0 |
表项 | 整数型 | | |
时间数组 | 文本型 | | 0 |
交换变量 | 文本型 | | |
位置变量1 | 整数型 | | |
未比数据数量1 | 整数型 | | |
计次循环首 (超级列表框1.
取表项数 (), i
)
时间参数 = 超级列表框1.
取标题 (i - 1, 1
)
如果真 (时间参数 =
“”)
到循环尾 ()
调试输出 (时间参数, i)
加入成员 (时间数组, 时间参数
)
计次循环尾 ()未比数据数量 =
取数组成员数 (时间数组
)未比数据数量1 = 未比数据数量
调试输出 (“未比数据数量:”, 未比数据数量
)
判断循环首 (未比数据数量 > 0
)
最后位置 = 0

变量循环首 (1, 未比数据数量 - 1, 1, 位置变量
)
文本_分割文本 (时间数组
[位置变量
],
“:”, , 临时数组
)
文本_分割文本 (时间数组
[位置变量 + 1
],
“:”, , 临时数组1
)
调试输出 (“位置变量:”, 位置变量, 临时数组
[1
])

如果真 (到整数 (临时数组
[1
]) >
到整数 (临时数组1
[1
]))



交换变量 = 时间数组
[位置变量
] 


时间数组
[位置变量
] = 时间数组
[位置变量 + 1
]


时间数组
[位置变量 + 1
] = 交换变量



最后位置 = 位置变量




变量循环尾 ()
未比数据数量 = 最后位置
判断循环尾 ()
判断循环首 (未比数据数量1 > 0
)
最后位置 = 0

变量循环首 (1, 未比数据数量1 - 1, 1, 位置变量1
)
文本_分割文本 (时间数组
[位置变量1
],
“:”, , 临时数组
)
文本_分割文本 (时间数组
[位置变量1 + 1
],
“:”, , 临时数组1
)
调试输出 (“位置变量:”, 位置变量1, 临时数组
[2
])

如果真 (到整数 (临时数组
[2
]) >
到整数 (临时数组1
[2
]) 且 到整数 (临时数组
[1
]) =
到整数 (临时数组1
[1
]))



交换变量 = 时间数组
[位置变量1
] 


时间数组
[位置变量1
] = 时间数组
[位置变量1 + 1
]


时间数组
[位置变量1 + 1
] = 交换变量



最后位置 = 位置变量1




变量循环尾 ()
未比数据数量1 = 最后位置
判断循环尾 ()超级列表框1.
全部删除 ()
计次循环首 (取数组成员数 (时间数组
), j
)
调试输出 (时间数组
[j
])
表项 = 超级列表框1.
插入表项 (, , , , ,
)
超级列表框1.
置标题 (表项, 0,
到文本 (j + 1
))

超级列表框1.
置标题 (表项, 1, 时间数组
[j
])
计次循环尾 ()
|
超级列表框排序 | 整数型 | |
|
对象 | 超级列表框 | | | |
列索引 | 整数型 | | | | 实际数据 | 文本型 | | | | 类型 | 整数型 | | | | 区分大小写 | 逻辑型 | | | | 排序方式 | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
排序时间 | 整数型 | | |
排序变量 | 文本型 | | 0 |
序号数组 | 整数型 | | 0 |
表项数值 | 整数型 | | 0 |
图片数组 | 整数型 | | 0 |
状态图片 | 整数型 | | 0 |
变量 | 整数型 | | |
数据 | 文本型 | | |
列数 | 整数型 | | |
行数 | 整数型 | | |
单元数 | 整数型 | | |
选中项 | 整数型 | | |
i | | | |
排序时间 =
取启动时间 ()类型 =
选择 (类型 ≥ 0
且 类型 ≤ 4, 类型, 1
)区分大小写 =
选择 (是否为空 (区分大小写
), 真, 区分大小写
)排序方式 =
选择 (是否为空 (排序方式
), 真, 排序方式
)
如果真 (对象.现行选中项 ≠ -1
)
如果真 (对象.
取表项数值 (对象.现行选中项
) = 0
)

对象.
置表项数值 (对象.现行选中项, 1
)
选中项 = 对象.取表项数值 (对象.现行选中项)
计次循环首 (对象.
取表项数 (), 变量
)
如果 (类型 = 4
) 

数据 =
到文本 (对象.
取图片 (变量 - 1, 列索引
))


数据 =
删首尾空 (对象.
取标题 (变量 - 1, 列索引
))

计次循环首 (取数组成员数 (实际数据
), i
) 
如果真 (取文本左边 (实际数据
[i
],
取文本长度 (数据
) + 1
) = 数据 +
“:”)

数据 =
子文本替换 (实际数据
[i
], 数据 +
“:”,
“”, , ,
真)
跳出循环 ()





计次循环尾 ()
如果 (类型 ≠ 3
)
如果 (类型 = 4
) 

单元数 =
运算_二分查找 (排序变量, 数据, 0, 区分大小写
)


单元数 =
运算_二分查找 (排序变量, 数据, 类型, 区分大小写
)
插入成员 (排序变量, 单元数, 数据)
插入成员 (序号数组, 单元数, 变量 - 1
)
插入成员 (表项数值, 单元数, 对象.
取表项数值 (变量 - 1
))
插入成员 (状态图片, 单元数, 对象.
取当前状态图片 (变量 - 1
))

插入成员 (序号数组,
选择 (数据 =
“假”, 变量, 1
), 变量 - 1
)
插入成员 (表项数值,
选择 (数据 =
“假”, 变量, 1
), 对象.
取表项数值 (变量 - 1
))
插入成员 (状态图片,
选择 (数据 =
“假”, 变量, 1
), 对象.
取当前状态图片 (变量 - 1
))

计次循环尾 ()列数 = 对象.
取列数 ()行数 =
取数组成员数 (序号数组
)单元数 = 行数 × 列数
重定义数组 (排序变量, 假, 单元数
)重定义数组 (图片数组, 假, 单元数
)
计次循环首 (单元数, 变量
)
排序变量
[变量
] = 对象.
取标题 (序号数组
[取绝对值 (选择 (排序方式, -1, 行数
) �
�� (变量 - 1
) \ 列数
)], (变量 - 1
) % 列数
)
图片数组
[变量
] = 对象.
取图片 (序号数组
[取绝对值 (选择 (排序方式, -1, 行数
) �
�� (变量 - 1
) \ 列数
)], (变量 - 1
) % 列数
)
计次循环尾 ()
计次循环首 (单元数, 变量
)
对象.
置标题 ( (变量 - 1
) \
列数, (变量 - 1
) % 列数, 排序变量
[变量
])
对象.
置表项数值 ( (变量 - 1
) \ 列数, 表项数值
[取绝对值 (选择 (排序方式, -1, 行数
) �
�� (变量 - 1
) \ 列数
)]) 
如果真 (图片数组
[变量
] ≠ -1
)

对象.
置图片 ( (变量 - 1
) \
列数, (变量 - 1
) % 列数, 图片数组
[变量
]) 
如果真 (状态图片
[取绝对值 (选择 (排序方式, -1, 行数
) �
�� (变量 - 1
) \ 列数
)] ≠ -1
)

对象.
置状态图片 ( (变量 - 1
) \ 列数, 状态图片
[取绝对值 (选择 (排序方式, -1, 行数
) �
�� (变量 - 1
) \ 列数
)]) 

计次循环尾 ()
如果真 (选中项 ≠ 0
)
计次循环首 (对象.
取表项数 (), 变量
)

如果真 (对象.
取表项数值 (变量 - 1
) = 选中项
)


对象.现行选中项 = 变量 - 1



对象.
保证显示 (变量 - 1
)

跳出循环 ()



计次循环尾 ()返回 (取启动时间 () - 排序时间)