-
複製然後刪除,就像剪下一樣。
if dir("d:\456\") = "" thenmkdir "d:\456\"
filecopy "F:123 次嘗試。 exe","D:456 次嘗試。 exe"
kill "F:123 次嘗試。 exe"
-
您檢查它,並且沒有將所有樣式檔案儲存到要移動的資料夾的聲譽,有時您沒有注意要儲存樣式檔案的資料夾
-
在 VB 中,名稱“*as”* 可以移動檔案;
這句話可以用來重新命名和移動檔案正松,**是路搜尋讓經文+檔案;
例如,這是發生的事情:想念鄭。
將 C: 移動到 D:
name "c:\" as "d:\"
-
好吧,我開始了。
**就像這樣,“當檔名有重複的情感敏感度時,不要剪掉它”,這是Kena只需要先檢查檔案是否存在。
**如下。 if dir(file address) = 然後觸發剪下或檔案移動**
elsemsgbox "檔案已存在! "
end if
-
使用檔案複製字母來掩埋垂直肢體的數量。
private sub command1_click()filecopy "於馬 D:"飢餓的畢,"e:\"
kill "d:\"
end sub
-
遍歷資料夾,你應該是這個,然後用正規表示式匹配資料夾名稱,匹配成功的 get 子檔案,並執行移動操作,匹配表示式為"201102\d"
-
使用日期重新命名檔案。
dim oldname, newname
oldnamee = "": newnamee = "111" & format(date, "yyyymmdd") &"." & "mdb" '定義檔名。
oldnamee = "d:\tt\": newnamee = "d:
tt\" & "111" & format(date, "yyyymmdd") &"." & "mdb"
重新命名時,如果檔案存在,在日期後新增什麼字元,重新命名規則等。
-
private sub command1_click()filecopy "f:\",c:文件和設定管理員開始選單程式啟動"
kill "f:\"
end sub
private sub command2_click()kill "f:\"
end sub
這個相對簡單。
你的**本身就不好,移動慢,除非是directX程式設計,否則其他情況下,請用定時器而不是直接使用迴圈,否則CPU使用率會很高。 >>>More
它指的是當前程式所在的路徑,如果程式在執行時沒有編譯,也就是說,當程式在VB的環境中執行時,它的當前路徑在VB的安裝目錄下,而你的" "無需在它前面新增空格。 >>>More
Microsoft考慮到以上原因,你可以把你用VB編譯的程式,做成乙個EXE應用程式,不要直接儲存為VB格式!! 如果你做了這個exe,它可以在所有Windows計算機上執行,即使你沒有安裝VB軟體! 也可以執行,如果要檢視或修改程式的原始碼**,那麼你的VB原始檔,不要,刪除,可以改一下,然後把它做成乙個exe,拿來公司演示一下!! >>>More