1樓：匿名使用者
讀取檔案：
dim inputdata as string*1open"c:\abc.txt" for input as #1do while not eof(1)
inputdata=input(1,#1)text1.text=text1.text+inputdataloop
close#1
替換原來檔案的內容：
dim outputdata as stringopen"c:\abc.txt" for output as #1print#1,text1.text
close#1
2樓：
private sub command1_click()dim s as string
dim a as string
open "c:\abc.txt" for input as #1if not eof(1) then
input #1, s
end if
while not eof(1)
s = s & vbcrlf
input #1, a
s = s & a
wend
close #1
text1.text = s
end sub
是要把文字框內容存到檔案還是
vb如何讀取txt檔案裡面的內容到文字框
3樓：匿名使用者
dim a as stringopen "c:\1.txt" for input as #1 '檔案路徑可以修改input #1,aclose #1text1=a
4樓：匿名使用者
private sub form_click()dim a$
open "c:\1.txt" for input as #1doinput #1, a
text1.text = text1.text & a & vbcrlf
loop until eof(1)
close #1
end sub
貌似1樓的只能讀取1行而已。。
vb如何把檔案內容顯示在文字框中？
5樓：匿名使用者
vb6.0可以使用textbok控制元件或richtextbox控制元件實現將讀入文字檔案顯示於控制元件中。
textbox 控制元件有時也稱作編輯欄位或者編輯控制元件，顯示設計時輸入的使用者輸入的、或執行時在**中賦予控制元件的資訊。
為了在 textbox 控制元件中顯示多行文字，要將 multiline 屬性設定為
true。如果多行 textbox 沒有水平滾動條，那麼即使 textbox 調整了大小，文字也會自動換行。為了在
textbox 上定製滾動條組合，需要設定 scrollbars 屬性。
如果文字框的 multiline 屬性設定為 true 而且它的
scrollbars 沒有設定為 none (0)，則滾動條總出現在文字框上。
如果將 multiline 屬性設定為 true，則可以在 textbox 內用 alignment 屬性設定文字的對齊。如果 multiline 屬性是 false，則
alignment 屬性不起作用。
**例項：
private sub command1_click()
dim strj() as string
' 設定「cancelerror」為 true
commondialog1.cancelerror = true
on error goto errhandler
' 設定標誌
commondialog1.flags = cdlofnhidereadonly
' 設定過濾器
commondialog1.filter = "all files (*.*)|*.
*|text files" & "(*.txt)|*.txt|batch files (*.
bat)|*.bat"
' 指定預設的過濾器
commondialog1.filterindex = 2
' 顯示「開啟」對話方塊
commondialog1.showopen
' 顯示選定檔案的名字
debug.print commondialog1.filename
str = commondialog1.filename
open commondialog1.filename for input as #1
do until eof(1)
line input #1, s
text1.text = text1.text & s & vbcrlf
loop
close #1
exit sub
errhandler:
exit sub
end sub
richtextbox 控制元件不僅允許輸入和編輯文字，同時還提供了標準 textbox
控制元件未具有的、更高階的指定格式的許多功能。
上述**同樣適合richtextbox控制元件使用
6樓：
樓上已經給了方法，不過我提醒下，最好用error方法判斷檔案選擇是否取消，而不要用f.filename=""，不然第二次你選擇取消也會開啟第一次的檔案
7樓：匿名使用者
把text1的multiline屬性設為true，scrollbars屬性設為2 - both
private sub command1_click()f.filter = "文字文件(*.txt)|*.txt"
f.filename = ""
f.showopen
if f.filename = "" then enit subgetfreefile = freefileopen f.filename for input as #getfreefile
do while not eof(getfreefile)line input #1, readfiletext1.text = text1.text & readfile & vbcrlf
loop
close #getfreefile
end sub
vb怎麼開啟窗體檔案，vb 怎樣開啟檔案並把檔案內容顯示在文字框
用shell函式shell 函式 執行一個可執行檔案，返回一個 variant double 如果成功的話，代表這個程式的任務 id，若不成功，則會返回 0。語法 shell pathname windowstyle shell 函式的語法含有下面這些命名引數 部分 描述pathname 必要引數。...
想用c 讀取檔案。檔案內容如下
很簡單 我來寫 2011 03 01 00 00 00,9001,0011156,92,10,87303291,150262852 2011 03 01 00 00 00,9001,0011156,3,10,87303289,216000651 press any key to continue i...
用C編寫Windows程式讀取檔案內容
根據某一行後面固定的字串，分別讀取本行該字串前面的數字這一句不是很明白,是每一行都有？還有你這數字字串一行有幾個？描述詳細些 用c 編寫一個windows應用程式，該程式功能為 從本機讀取一個文字檔案 檔案中不包含中文字元和符 10 在程式中獲得字串中數字或字母的長度時，可以先使用charenume...