1樓：豆淡威嘉惠
jbp22d5f90f0a，你究竟是何方神聖？以jbp打頭的名字上百個，財富值794710，提問數122627，回答數0，提問永遠匿名，從不加分，很少採納，每次一提問就是幾十個問題一起發，舉報管理員也不受理，你是管理員他爹？
2樓：匿名使用者
這個肯定要用到檔案操作的相關知識了.
vb如何把檔案內容顯示在文字框中？
3樓：匿名使用者
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控制元件使用
4樓：
樓上已經給了方法，不過我提醒下，最好用error方法判斷檔案選擇是否取消，而不要用f.filename=""，不然第二次你選擇取消也會開啟第一次的檔案
5樓：匿名使用者
把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中，怎樣把數字從string轉換為Integer
用型別轉換 抄函式cint或val均可即可將數字從string轉換到integer型別。示例 dim a as string,b as integera 12.53 b cint a 或者 b val a print b val 函式可以的來 privat sub dim s as string d...
在vb中是什麼意思，VB中「 」是什麼意思？
運算 符用來對兩個數作除法並返回一個整數。語法result number1 number2 運算子的語法具有以下幾個部分版 部分 描述 result 必需的 任何數權值變數。number1 必需的 任何數值表示式。number2 必需的 任何數值表示式。說明在進行除法運算之前，數值表示式通過捨去小數...
vb中的eitdo怎麼理解,VB中的exitdo怎麼理解
exit do是強制退出do while迴圈並執行end do後面的語句，exit do上面一定是條件語句，當符合條件時終止迴圈 do while.if then exit do.loop do.loop是迴圈，每個迴圈中判斷條件，如果符合if條件，就跳出loop迴圈，再則繼續loop 跳出這個迴圈...