以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  如何批量修改文件夹名  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=101130)

--  作者：tongyong1969 --  发布时间：2017/5/25 14:17:00 --  如何批量修改文件夹名 获取c:\\abc文件夹下的子文件夹名后，想对其名称修改为1，2，3，4.......，请问如何实现？

--  作者：有点色 --  发布时间：2017/5/25 16:09:00 --   Dim i As Integer = 1 For Each dir As String In FileSys.GetDirectories("g:\\test\\")     FileSys.RenameDirectory(dir,i)     i += 1 Next

--  作者：tongyong1969 --  发布时间：2017/5/25 16:48:00 --   按你的方法解决了，谢谢！