使用 Name 语句来更改文件的名称。示例中假设所有使用到的目录或文件夹都已存在。
Dim OldName, NewName
OldName = "OLDFILE": NewName = "NEWFILE" ' 定义文件名。
Name OldName As NewName ' 更改文件名。
OldName = "
C
:\MYDIR\OLDFILE": NewName = "C:\YOURDIR\NEWFILE"
Name OldName As NewName ' 更改文件名，并移动文件。
其它：
使用shell语句来调用dos命令rename。
关键代码如下：
Name "C:\AA.TXT" As "C:\BB.TXT"
Name "C:\AA.TXT" As "C:\BB.RAR"
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024