'用 name 函数 就可以 '把c盘的111.txt文件改成123.txt 其他目录的 改路径就行, Private Sub Command1_Click() Dim oldname As String, newname As String oldname = "C:\111.txt" newname = "C:\123.txt" Name oldname As newname End Sub
