開啟文字檔案是不少程式必須處理的問題。如何更有效地開啟文字檔案應該是乙個值得研究的課題。為此，筆者將自己蒐集到的幾種方法無私地奉獻出來(-_-)，供各位參考。
下面所舉的例子均假設f盤下有乙個名為d.txt的文字檔案，若需要嘗試這些例子請作相應的改動。
方法一:
用定長的string變數獲取文字內容。由於定長string變數支援的下界為65400,所以在開啟超過32k位元組的檔案時超出部分的位元組將無法獲取:
private sub command1_cliack()
dim sa as string * 65400 '宣告定長string變數
open "f:/d.txt" for binary as #1 '用二進位制開啟檔案
get #1, , sa '用get語句從檔案中獲取位元組
text1 = sa '顯示開啟的檔案
close #1 '關閉檔案
end sub
方法二:
先宣告一字串變數，然後用空格填充字串，使變數大小與檔案大小一致，再通過get語句將檔案全部資料儲存到變數中，從而達到獲取整個檔案位元組數的目的。此法可以開啟大於32k的檔案，但應該注意的是，裝載檔案的容器必須能裝載大於32k的檔案，下例用richtextbox控制項顯示開啟的檔案：
private sub command1_click()
dim sa as string
open "f:/d.txt" for binary as #1
sa = space(lof(1)) '用空格填充sa變數
get #1, , sa '用get語句獲取檔案全部內容
richtextbox1.text = sa
close #1
end sub
方法三：
用strconv函式將檔案的控制字串資料和unicode碼之間進行轉換，從而達到開啟檔案的目的。可開啟任意大小檔案。此法筆者曾有一篇文章談及，這裡再給乙個簡單例子：
private sub command1_click()
open "f:/d.txt" for input as #1
richtextbox1.text = strconv(inputb$(lof(1), 1), vbunicode)
close #1
end sub
方法四：
用shell語句直接調出windows的記事本，給個檔名即可輕而易舉地開啟文字檔案。此法適合於開啟程式的readme檔案(注意：在可執行檔案和要開啟的文字檔案之間要有空格)：
shell "notepad.exe f:/d.txt",vbnormalfucus
方法五：
用richtextbox控制項自身的loadfile屬性開啟檔案：
richtextbox1.loadfile "f:/d.txt", rtftext
vb讀取和寫入文字檔案
dim flname as string dim ofilenum as long dim sline as string dim ifilenum as long flname c dxfelement.dat if dir flname then kill flname end if ofile...
C 讀取文字檔案的幾種方法
前幾天要用到c 讀取文字檔案，就學習了一下幾種不同的讀取方法 文字檔案內容如下 第一種 直接讀取，以空格換行 int main 第一種讀取方法，char buf 1024 while infile buf 第二種 陣列方法，逐行讀取，可讀取空格 int main 第二種讀取方法 char buf 1...
建立文字檔案的兩種方法
建立文字檔案的兩種方法 2011年02月07日 1 建立文字檔案的兩種方法 sub vb建立檔案 dim sfname as string,ifnumber as integer,r as long sfname thisworkbook.path vb檔案.txt ifnumber freefil...