在 VB 中編寫檔案替換工具

你想這樣做嗎：先做乙個備份，然後桐棚以後再重新命名？ 森襪子。

以下 ** 變為：

private sub command1_click()if dir( &") and dir( &"然後，該局是

name & " as & "

name & " as & "

end if

end sub

private sub command1_click()dim exepath as stringdim temp() as byte

exepath = iif(right(, 1) =, &if dir(exepath & "橡木作弊手）=然後msgbox"沒有找到": exit sub

if dir(exepath & ") thenopen exepath & " for binary as #redim temp(lof(1)) as byteopen exepath & " for binary as #get #1, ,temp

put #2, ,temp

close #

close #

end if

open exepath & " for binary as #redim temp(lof(1)) as byteopen exepath & " for binary as #get #1, ,temp

put #2, ,temp

close #

close #

end sub

不能大於2g，不能在執行中被阻擋或被橫樑佔據。

我不知道我是否能完成您的要求？

private sub command1_click()name & "游泳是滑溜溜的&"

filecopy & "，&上帝的匹配"

end sub

是的，我幾年前就這樣做了，將所有**路徑放在乙個列表框中。

過了一會兒，你可以呼叫systemparaminfo，你可以改變它。

replace(nm," ",",")

你說的有乙個空格，它不應該是乙個空格，它感覺像乙個 Tab 鍵。

declare function copyfile lib "kernel32" alias "copyfilea" (byval lpexistingfilename as string, byval lpnewfilename as string, byval bfailifexists as long) as long

第乙個引數是原始檔案位址，第二個引數是目標位址及其新名稱，第三個引數設定為 true（非零），則一旦物件檔案已存在，函式呼叫將失敗。 否則，目標檔案將被覆蓋。

唉，它的實際VB還是有很多不足的，比如我們在做MFC VC的時候已經習慣了這些API，操作上就好多了。 希望對你有所幫助！

你的幾十篇課文的內容有什麼變化的模式嗎？

或者，所有以前的名字都一樣嗎？

如果水果是字串，則與 replace（string1，string2） 幾乎相同。 另一種方法是讀出它，將其儲存在陣列中，然後激發它以獲得糟糕的節拍，然後將其儲存在檔案中。

,"你","線段 01")

財富之友","02")

這是乙個很好的紅薯","03")

01","你")

02","人")

03","好")