1樓：匿名使用者
其實在另一個問題已經回你了，不過失效了。。。
private sub form_load()dim path as string, spath as string
dim max as date, newfilepath = "d:\"
spath = dir(path & spath)do until spath = ""
if filedatetime(path & spath) > max then '判斷檔案最後修改日期
max = filedatetime(path & spath)newfile = path & spath '記錄對應檔名end if
spath = dir
loop
name newfile as path & text1.text & "67890.txt" '改名， as 前面為原檔名，後面為修改後
end sub
2樓：網海1書生
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修改檔名
3樓：梅萱夫丙
name
"d:\a.txt"
as"d:\b.txt"
同樣有複製的作用.
把後面的換個路徑的話
就會複製到那裡並重新命名
4樓：匿名使用者
private sub form_load()dim i as integer
i=121
end sub
新增一個按鈕，命名「修改」，加入如下**：
name "c:\abc\temp_" & i & ".txt" as "c:\abc\temp.txt"
i=i+1
新增一個按鈕，命名「刪除」，加入如下**：
kill "c:\abc\temp.txt"搞定
5樓：匿名使用者
二次補充：肯定沒問題了，把其他功能都去掉了，只剩下改名和刪除，如果想吧刪除去掉，就去註釋的那一句。
＝＝＝＝＝＝＝＝＝＝＝＝
建一個command1，如果需要，建立command2。
**如下。
＝＝＝＝＝＝＝＝＝＝＝＝
dim t as integer, s as stringprivate 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
6樓：
修改後全部刪掉,有什麼意義?
temp.txt也刪嗎 ?
樓上的就是全部刪掉了.
7樓：匿名使用者
name 語句
重新命名一個檔案、目錄、或資料夾。
語法name oldpathname as newpathname
name 語句的語法具有以下幾個部分：
部分描述oldpathname
必要引數。字串表示式，指定已存在的檔名和位置，可以包含目錄或資料夾、以及驅動器。
newpathname
必要引數。字串表示式，指定新的檔名和位置，可以包含目錄或資料夾、以及驅動器。而由 newpathname
所指定的檔名不能存在。
說明name 語句重新命名檔案並將其移動到一個不同的目錄或資料夾中。如有必要，name 可跨驅動器移動檔案。 但當 newpathname 和
oldpathname 都在相同的驅動器中時，只能重新命名已經存在的目錄或資料夾。 name 不能建立新檔案、目錄或資料夾。
在一個已開啟的檔案上使用 name，將會產生錯誤。必須在改變名稱之前，先關閉開啟的檔案。name 引數不能包括多字元 (*)
和單字元 (?) 的統配符。
name 語句示例
本示例使用 name 語句來更改檔案的名稱。示例中假設所有使用到的目錄或資料夾都已存在。
dim oldname, newname
oldname = "oldfile": newname = "newfile" ' 定義檔名。
name oldname as newname ' 更改檔名。
oldname = "c:\mydir\oldfile": newname = "c:\yourdir\newfile"
name oldname as newname ' 更改檔名，並移動檔案。
vb如何批量更改檔名？
8樓：匿名使用者
name 語句
重新命名一個檔案、目錄、或資料夾。
語法name oldpathname as newpathname
oldpathname --- 原檔名
newpathname --- 新檔名
例如：name "閭撳皬騫蟲椂浠e叏25絝_doc" as "閭撳皬騫蟲椂浠e叏25絝.doc"
9樓：匿名使用者
1、用 dir 遍歷目錄下檔案，
2、然後repalce替換 「_」 為 點，
3、最後 name...as...
vb如何批量修改檔名？
10樓：網海1書生
dim s() as string
d=dir("d:\*.doc")
do until d=""
s=split(d,".")
s(ubound(s)-1)=s(ubound(s)-1) & "b"
name "d:\" & d as "d:\" & join(s,".")
d=dir
loop
msgbox "批量修改檔名完畢！"
如何使用vb修改檔名，去掉包含指定字串的
VB批量修改檔名，用VB批量重新命名檔案，如何實現？
我有個現成的 可以發給你看 你的 明顯的高複雜了 控制元件和你的一樣。要的話hi me 我有dir搜尋指定目錄所有檔案的 改名也很簡單，但是你的要求很模糊，如果有意思請詳細說明要求，我給你 發訊息即可。迴圈用dir函式遍歷d a目錄下所有檔案得到檔名然後改名即可 用vb批量重新命名檔案，如何實現？r...
VB從全路徑中獲取檔名，VB如何提取路徑中的檔名？
public function getfilename byval fullpathname as string,optional byval noextname as boolean false as string 從指定全路徑中找到檔名 fullpathname指定全路徑 返回值 包含的檔名 d...
bat批量移除檔名中指定字元，如何用bat批量刪除檔名中指定字元後面的字串
1 右鍵單擊需要刪除的檔案，然後選擇屬性選項。2 之後在屬性介面找到安全，然後單擊安全，接著單擊安全下方的編輯。3 然後將新彈出介面中間的 authenticated users的許可權 中的完全修改項調整為允許。4 最後單擊最下方的應用和確定就完成了administrators許可權的設定，之後就...