超级列表框排序，有正序和降序选择

' lParam1 和 lParam2 是 超级列表框.置表项数值() 的值；
' 如果 lParam1 要排在 lParam2 前面，则函数需要返回一个负数；
' 如果 lParam1 要排在 lParam2 后面，则函数需要返回一个正数；
' 如果不改变两者位置则返回0。
.判断开始 (组合框_排序列.现行选中项 ＝ 0)
' 超级列表框 第0列用数字方式排序
整数1 ＝ 到整数 (指针到文本 (lParam1))
整数2 ＝ 到整数 (指针到文本 (lParam2))
.判断开始 (组合框_升降序.现行选中项 ＝ 0)
返回 (到整数 (整数1 － 整数2)) ' 升序
.默认
返回 (到整数 (整数2 － 整数1)) ' 降序
.判断结束

.判断 (组合框_排序列.现行选中项 ＝ 1)
' 超级列表框 第1列用文本方式排序
.判断开始 (组合框_升降序.现行选中项 ＝ 0)
返回 (lstrcmpA (lParam1, lParam2)) ' 升序
.默认
返回 (lstrcmpA (lParam2, lParam1)) ' 降序