:8.964KB : :1 :2019-12-19 17:08:30
建议调试时调用该子程序,如保存文件不存在或出现其它错误,该程序会崩溃,文件不存在或被更改等原因使数组成员引用下标超出自定义范围后程序崩溃,遇到上述情况时会返回逻辑值假,并复原原超级列表框;成功返回逻辑值真。
随机密码 = 到文本 (求余弦 (取随机数 (1, 180)))
超级列表框_保存 (超级列表框, 取特定目录 (10) + “\备份数据.txt”, 随机密码)
' 备份超级列表框数据,用以崩溃时复原
.如果 (是否为空 (密码))
分割文本 = 分割文本 (到文本 (读入文件 (保存位置)), #分隔符_版块, )
.否则
分割文本 = 分割文本 (到文本 (解密数据 (读入文件 (保存位置), 密码, 2)), #分隔符_版块, )
.如果结束
.如果真 (取数组成员数 (分割文本) ≠ 19) ' 【防止崩溃】
超级列表框_读入 (超级列表框, 取特定目录 (10) + “\备份数据.txt”, 随机密码)
删除文件 (取特定目录 (10) + “\备份数据.txt”)
输出调试文本 (“出错,原因可能是:1.错误 2.保存文件不存在 3 保存文件被更改 [出错位置:1]”)
02-16高效实现超级列表框百万级数据高速导入导
02-09树形框,超级列表框,纯api美化
02-09超级列表框读写配置和移动表项
02-04超级列表框分页显示例程
02-04多线程多任务演示,自定义数据类型/超级列
02-03超级列表框EXCEL导入导出功能
01-29外部超级列表框,置单元格颜色
01-29二维数组排序,超级列表框排序的模块2.0
01-25关于二维数组排序、超级列表框排序的模块