讀檔寫檔
FileOpen ( 檔案代碼 , "檔案路徑" , OpenMode.存取模式 )檔案代碼可以自行以數字設定，或是以 FreeFile() 自動取得
存取模式有三種：Output（全新寫入）、Append（接續寫入）、Input（讀取）
使用完畢後須關閉檔案：FileClose( 檔案代碼 )，若沒填代碼，則全部關閉。
循序資料檔的讀寫
讀取：Input ( 檔案代碼 , 變數 )
寫入：Print ( 檔案代碼 , 資料 , … ) ←資料不換行，沒有雙引號
PrintLine ( 檔案代碼 , 資料 , … ) ←資料會換行，沒有雙引號
Write ( 檔案代碼 , 資料 , … ) ←資料不換行，會有雙引號
WriteLine ( 檔案代碼 , 資料 , … ) ←資料會換行，會有雙引號
檔案結束符號：EOF，用來判斷是否讀取到檔案結尾。
例： Do While ( Not EOF( 檔案代碼 ) )
Input ( 檔案代碼 , 變數 )
．．．．
LOOP
讀檔 EX My.Computer.FileSystem.ReadAllText("C:\ABC.txt")
(讀取 ABC.txt)
寫檔 EX My.Computer.FileSystem.WriteAllText("C:\ABC.txt", writetxt, False)
(寫檔至C槽的ABC.txt (副檔名不可漏),寫入變數writetxt 中的字串,
False=不接續 會將原本蓋掉 若要接著寫檔 填True)
分割
Split("要分割的字串","當作分割指標的符號") EX Split("1.2.3",".") 傳出值為"1","2","3"
Split(已存入字串的變數,"當作分割指標的符號")
函數應用 先宣告一個 r() , r =split(My.Computer.FileSystem.ReadAllText("C:\ABC.txt"),"符號")
即可讀取ABC.txt並分割,儲存每一個分割的字串到r()
Replace(取代)
EX (Replace(已儲存字串的變數, "原本字串的要被取代的字", "要取代成的字")Response = MsgBox("請問是否開新遊戲", MsgBoxStyle.YesNo)
If Response = vbYes Then
http://blog.xuite.net/alwaysfuturevision/liminzhang/8521465-Visual+Basic+2005+%E6%AA%94%E6%A1%88+IO+%E8%88%87%E8%B3%87%E6%96%99%E5%AD%98%E5%8F%96%E7%A7%98%E8%A8%A3
