图片或文件一键批量修改文件名工具

看说明添加 自定义文件类型
优化代码花用时间更少
添加 共用多少时间
添加 滑块条进度

.如果 (编辑框1.内容 ≠ “”)
时钟1.时钟周期 ＝ 1000
进度条1.最大位置 ＝ 到整数 (编辑框1.内容)
.计次循环首 (到整数 (编辑框1.内容), 计数1)
文件 ＝ 读入文件 (列表框1.取项目文本 (计数1))
' 调试输出 (“文件：” ＋ 到文本 (文件))
创建目录 (编辑框3.内容)
判断 ＝ 写到文件 (编辑框3.内容 ＋ “\” ＋ 编辑框4.内容 ＋ 到文本 (计数1) ＋ 编辑框5.内容, 文件) ' d:\232\32.jpg'
延迟 (1)
刷新显示 ()
.如果 (判断 ＝ 真)
显示 ＝ 编辑框3.内容 ＋ “\” ＋ 编辑框4.内容 ＋ 到文本 (计数1) ＋ 编辑框5.内容 ＋ “文件写入成功！”
编辑框2.文本颜色 ＝ #蓝色
.否则
显示 ＝ 编辑框3.内容 ＋ “\” ＋ 编辑框4.内容 ＋ 到文本 (计数1) ＋ 编辑框5.内容 ＋ “文件写入不成功！看看是不是相关按键操作区出现错误？”
编辑框2.文本颜色 ＝ #红色
.如果结束
' 调试输出 (“编号：” ＋ 到文本 (计数1))
' 调试输出 (“是否写入成功：” ＋ 到文本 (判断))
' 调试输出 (编辑框3.内容 ＋ “\” ＋ 编辑框4.内容 ＋ 到文本 (计数1) ＋ 编辑框5.内容, 文件)
编辑框2.加入文本 (“文件编号” ＋ 到文本 (计数1) ＋ #换行符)
编辑框2.加入文本 (“是否写入成功：” ＋ 显示 ＋ #换行符)
.如果 (进度显示 ≤ 到整数 (编辑框1.内容) － 1)
进度显示 ＝ 进度显示 ＋ 1
.否则
进度显示 ＝ 进度显示 ＋ 1
.如果结束
进度条1.位置 ＝ 进度显示
.计次循环尾 ()
时钟1.时钟周期 ＝ 0
编辑框2.加入文本 (“批量处理完成；” ＋ “共用时间：” ＋ 到文本 (时间) ＋ “秒！” ＋ “本工具有PV开发” ＋ #换行符)
写到文件 (编辑框3.内容 ＋ “\” ＋ “批量操作生成信息.txt”, 到字节集 (到文本 (编辑框2.内容)))
.否则
信息框 (“你要选着文件进入软件才可以 批量修改文件”, 0, “pv提示：”)