‘壹’ VB给文件重命名
使用 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。
‘贰’ 在VB中文件改名的两种方法
第一种（推荐余简）
Name "原文件名" As "新文件名"
第二种
FileCopy "原文件名"竖模裤, "新文件名码山"
Kill "原文件名"
‘叁’ 怎样利用VB在EXCEL按保存或关闭时更改文件名称
给你简单示例：
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim xl As New Excel.Application Dim xlBook As Workbook
Set xl = GetObject(, "Excel.Application")
Set xlBook = xl.ActiveWorkbook
FN1 = xlBook.Name & CStr(Year(Date))
ActiveWorkbook.SaveCopyAs "D:/" & FN1 & ".xls"
End Sub
有两个问题你自己很容易解决了
一是截取原来文件的文件名，即从“客户信息记录2013-4-1”这名字中取出冲知前一部分
二是注意日期伍铅格式，因为散橘消可能你系统的日期格式是2013/4/1，斜杠/文件名中不可用，你得检测并转换
‘肆’ vb 文件改名
VB改名可以用name方法
Name oldpathname As newpathname
Name 语句的语法具有以下几个部分：
oldpathname 必要参数。字符串表达式，指定已存在的文件名和位置，可以包含目录或文件夹、以及驱动器。
newpathname 必要参数。字符串表达式，指含键告定新的文件名和位置，可以包含目录或文件夹、以及驱动器。而由 newpathname 所指定的文件名不能存在。
Name 语谈明句重新命名文件并将其移动到一个不同的目录或文件夹中。如有必要，Name 可跨驱动器移动文件。 但当 newpathname 和 oldpathname 都在相同的驱动器中时，只能重新命名已经存在的目录或文件夹。 Name 不能创建新文件、目录或文件夹。
在一个已打开的文件上使用 Name，将会产生错误。必须在改变亮毕名称之前，先关闭打开的文件。Name 参数不能包括多字符 (*) 和单字符 (?) 的统配符。
经查阅MSDN里，VB里没有moveto方法改名，其他语言有~~下面是MoveTo 方法
MoveTo Method (Folder Object)
The MoveTo method relocates the Folder object to another folder hierarchy location.
Syntax
Set objMovedFolder = objFolder.MoveTo(folderID [, storeID ] )
objMovedFolder
On successful return, contains the moved Folder object.
objFolder
Required. This Folder object.
folderID
Required. String. The unique identifier of the new parent Folder object, that is, the Folder object under which this folder is to appear as a subfolder.
storeID
Optional. String. The unique identifier of the InfoStore object in which this folder is to appear, if different from its current InfoStore.
Remarks
All subfolders of this folder, together with all Message objects contained within this folder and its subfolders, are moved along with the folder itself.
The move operation takes effect immediately. This Folder object is no longer accessible at its former location after the MoveTo method returns.
‘伍’ 请问，vb中保存之后的文件不能再修改吗
能修改，但要看看文件属性是否只读，如果只读请修改文件属性取消只读属性，然后可以修改。
‘陆’ 用vb怎样这样修改文件名
Private Sub command1_click()
Dim d As String
d = Dir("c:\abc\*.txt")
Do Until d = ""
Name "c:\abc\" & d As "c:\abc\" & Text1.Text & d
d = Dir
Loop
End Sub
以上代码是把"c:\abc"目录的所有txt的文冲旦件名前面插入text1的内容。如果只想给最新创建的文件添桐判空加，那么可以在局瞎循环中用FileDateTime("c:\abc\" & d)检测文件的时间，找出最新的那个即可。
‘柒’ VB如何批量更改文件名
Name 语句
重新命名一个文宽罩件、目录、或文件夹。
语法
Name oldpathname As newpathname
oldpathname --- 原文件名
newpathname --- 新文件名
例如：
Name "闾揿皬骞虫橘伍椂浠e叏25绔_doc" As "闾揿皬骞慎伍闹虫椂浠e叏25绔.doc"
‘捌’ VB.NET如何更改保存程序的文件夹名
很简单陪搭的几部操携乱轿作
打开VS选中程序 解决方案"学生信息管理系统"
选中后 选择VS菜单栏文件 "学生信息管理系统 "另存为
然后选择路径 把解决方案"学生信息管理系统" 保存到 学生信息管理系统辩肆 文件夹目录下
这样就可以了
‘玖’ 如何用vb修改文件名
二次补充：肯定没问题了，把其他功能都去掉了，只剩下改名和删除，如果想吧删除去掉，就去注释的那一句。
＝＝＝＝＝＝＝＝＝＝＝＝敏洞薯
建一个Command1，如果需要，建立Command2。
代码如下。
＝＝＝＝＝＝＝＝桥者＝＝＝＝
Dim t As Integer, s As String
Private Sub Command1_Click()
Name "c:\abc\temp_" & t & ".txt" As "c:\abc\temp.txt"
Kill "c:\abc\temp.txt" '不删除的话去掉这一句
t = t + 1
If t = 151 Then End '比方说你想进行到文件150，颤芦就要写上151
End Sub
Private Sub Form_Load()
t = 121
End Sub
‘拾’ VB如何更改文件的文件名，并且进行保存
使用NAME函数就行迟可以了,具体示例如下: 希望对你有所帮助. Private Sub Command1_Click() Dim src As String, des As String src = "d:\1.txt" '需要被修改的文件路径 des = "d:\abc.txt" '修改后胡锋的文件名裤带晌 Name src As des End Sub
希望采纳