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 '封閉文件
總結一下，避免文件被改寫的復雜完成方式就是在順序中先翻開該文件。
以上所述就是本文的全部內容了，希望大家可以喜歡。
