使用 Name 語句來更改文件的名稱。示例中假設(shè)所有使用到的目錄或文件夾都已存在。
主要從事網(wǎng)頁設(shè)計(jì)、PC網(wǎng)站建設(shè)(電腦版網(wǎng)站建設(shè))、wap網(wǎng)站建設(shè)(手機(jī)版網(wǎng)站建設(shè))、響應(yīng)式網(wǎng)站開發(fā)、程序開發(fā)、微網(wǎng)站、微信小程序開發(fā)等,憑借多年來在互聯(lián)網(wǎng)的打拼,我們?cè)诨ヂ?lián)網(wǎng)網(wǎng)站建設(shè)行業(yè)積累了豐富的成都做網(wǎng)站、網(wǎng)站設(shè)計(jì)、網(wǎng)絡(luò)營(yíng)銷經(jīng)驗(yàn),集策劃、開發(fā)、設(shè)計(jì)、營(yíng)銷、管理等多方位專業(yè)化運(yùn)作于一體,具備承接不同規(guī)模與類型的建設(shè)項(xiàng)目的能力。
Dim OldName, NewName
OldName = "OLDFILE": NewName = "NEWFILE" ' 定義文件名。
Name OldName As NewName ' 更改文件名。
OldName = "
C
:\MYDIR\OLDFILE": NewName = "C:\YOURDIR\NEWFILE"
Name OldName As NewName ' 更改文件名,并移動(dòng)文件。
其它:
使用shell語句來調(diào)用dos命令rename。
以修改“C:\abc.txt"為bat為例。
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Myfile As String
Myfile = IO.Path.ChangeExtension("C:\abc.txt", ".bat")
Microsoft.VisualBasic.FileSystem.Rename("C:\abc.txt", Myfile)
End Sub
End Class
Microsoft.VisualBasic.FileSystem.Rename(原文件夾完整路徑名稱,新的文件夾名稱)
Microsoft.VisualBasic.FileSystem.Rename("D:\1", "D:\2\1")‘當(dāng)路徑不對(duì)時(shí)會(huì)把原文件夾剪切到“D:\2\”下面文件夾名稱不變
Microsoft.VisualBasic.FileSystem.Rename("D:\1", "D:\2\2")")‘當(dāng)路徑不對(duì)時(shí)會(huì)把原文件夾剪切到“D:\2\”下面文件夾名稱 更改為 2
Microsoft.VisualBasic.FileSystem.Rename("D:\1", "D:\2")’當(dāng)路徑相同時(shí)只改文件夾名稱 不移動(dòng)文件
希望能幫到你
在解決方案資源管理器中,單擊My Project,改程序集名稱,重新啟動(dòng)程序,就可以了。
給我加分吧。
VB改名可以用name方法
Name oldpathname As newpathname
Name 語句的語法具有以下幾個(gè)部分:
oldpathname 必要參數(shù)。字符串表達(dá)式,指定已存在的文件名和位置,可以包含目錄或文件夾、以及驅(qū)動(dòng)器。
newpathname 必要參數(shù)。字符串表達(dá)式,指定新的文件名和位置,可以包含目錄或文件夾、以及驅(qū)動(dòng)器。而由 newpathname 所指定的文件名不能存在。
Name 語句重新命名文件并將其移動(dòng)到一個(gè)不同的目錄或文件夾中。如有必要,Name 可跨驅(qū)動(dòng)器移動(dòng)文件。 但當(dāng) newpathname 和 oldpathname 都在相同的驅(qū)動(dòng)器中時(shí),只能重新命名已經(jīng)存在的目錄或文件夾。 Name 不能創(chuàng)建新文件、目錄或文件夾。
在一個(gè)已打開的文件上使用 Name,將會(huì)產(chǎn)生錯(cuò)誤。必須在改變名稱之前,先關(guān)閉打開的文件。Name 參數(shù)不能包括多字符 (*) 和單字符 (?) 的統(tǒng)配符。
經(jīng)查閱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.
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的內(nèi)容。如果只想給最新創(chuàng)建的文件添加,那么可以在循環(huán)中用FileDateTime("c:\abc\" d)檢測(cè)文件的時(shí)間,找出最新的那個(gè)即可。