批处理之家 - Powered by Discuz! Board

标题: [问题求助] 【已解决】VBS如何在文件名中的数字前补零/补0？ [打印本页]

作者: 思想之翼 时间: 2013-11-3 19:49 标题: 【已解决】VBS如何在文件名中的数字前补零/补0？

本帖最后由 pcl_test 于 2016-7-15 18:28 编辑

For f = 1 to 1000
Set file = fso.OpenTextFile("j" & f & ".txt")
复制代码

上述代码指定1.txt--1000.txt文本

若1.txt--1000.txt文本名称该为0001.txt 0002.txt...1000.txt，这句代码如何修改？

作者: apang 时间: 2013-11-3 20:56

第2行
Set file = fso.OpenTextFile("j" & Right("000" & f , 4) & ".txt")

欢迎光临批处理之家 (http://www.bathome.net/)