VB Ruhe 確定 TRACERT 執行已完成並生成檔案

shell "cmd /c tracert > c:\", 0shell "cmd /c tracert > c:\", 0shell "cmd /c tracert > c:, 0aaa "c:\"

aaa "c:\"

aaa "c:\"

嘗試重新命名，如果檔案未完成，則無法重新命名：

sub aaa(filename)

on error resume next

filename1=filename & "1" '自己指定乙個。

if dir(filename1)<>"" then kill filename1

do while 1

doevents

name filename as filename1'重新命名。

if dir(filename1)<>"" then exit doloopname filename1 as filename'換回去。

f=freefile

close #f

end sub

如何判斷文字檔案的大小？

給我乙個想法，我沒試過，不知道可行不行：

在建立文字或開啟文字檔案時，設定屬性使文字檔案無法與其他程式共享，然後你正在使用乙個函式嘗試訪問該檔案，如果訪問成功，則該檔案不被占用，即寫入完成，如果訪問失敗， 那麼它仍在使用中，即寫作。

可以在文件的 ** 末尾新增提示。

收盤後。

msgbox"做"

暈倒了，樓上居然寫的是**，vb通常指的是，下面給出的原始碼。

確定檔案是否存在。

if dir("d:\") = "" then msgbox "檔案不存在"

如果要複製，可以使用 filecopy 路徑 1 和路徑 2 filecopy"d:\", "e:\"