VB簡略完成避免文件被改寫。本站提示廣大學習愛好者：（VB簡略完成避免文件被改寫）文章只能為提供參考，不一定能成為您想要的結果。以下是VB簡略完成避免文件被改寫正文
比來在寫的一個小法式中有個設置裝備擺設文件，這個文件對全部法式來講是相當主要的，假如它被刪除或許改寫的話，全部法式沒法運轉，或許運轉後沒法封閉。所以我一向在尋覓假如讓手工沒法改寫文件的辦法。
關於“刪除”來講是很輕易處理的，法式中查找設置裝備擺設文件的途徑，若為空則創立，並給些默許值。VB的示例代碼以下：
FileName = App.Path + "\CONFIG"
'假如文件不存在，則創立文件
If Dir(FileName) = "" Then
Open FileName For Output As #1 '翻開次序文件，我們可使用Open語句
a = Encode("123") + vbCrLf + "10" + vbCrLf 'vbCrLf為回車
Print #1, a '寫數據
Close #1 '封閉文件
End If
關於手工改寫設置裝備擺設文件，我一向力所不及，我試圖在法式中把該文件隱蔽失落。VB的示例代碼以下：
SetAttr FileName, vbSystem Or vbHidden '隱蔽文件
但終歸來講是治本不治標，文件依然會被改寫的。然後我想到修正設置裝備擺設文件後綴法，讓人手工沒那末輕易翻開文件，然則老是無方法翻開的。終究讓我想到一個簡略的處理辦法是，在法式中先翻開設置裝備擺設文件，以後手工就沒法翻開了。VB的示例代碼以下：
Open FileName For Binary As #99
只是記得法式在改寫該文件時要先封閉翻開的文件，否則改寫會掉敗的。VB的示例代碼以下：
Close #99 '封閉文件
總結一下，避免文件被改寫的簡略完成方法就是在法式中先翻開該文件。
以上所述就是本文的全體內容了，願望年夜家可以或許愛好。
