1樓:豆淡威嘉惠
jbp22d5f90f0a,你究竟是何方神聖?以jbp打頭的名字上百個,財富值794710,提問數122627,回答數0,提問永遠匿名,從不加分,很少採納,每次一提問就是幾十個問題一起發,舉報管理員也不受理,你是管理員他爹?
2樓:匿名使用者
這個肯定要用到檔案操作的相關知識了.
vb 怎樣開啟檔案並把檔案內容顯示在文字框
3樓:匿名使用者
1、單擊選單「工程」-「部件」,在彈出的「部件」對話方塊裡找到microsoft richtext box 6.0和公共對話方塊microsoft common dialog 6.0並選中它們,單擊「確定」按鈕。
2、在窗體上繪製richtext box和commn dialog。
3、右鍵窗體選擇選單編輯器,編寫開啟和清空選單。
4、兩個按鈕**:
private sub open_click()commondialog1.filter = "文字檔案 (*.txt)|*.
txt|(*.doc)|*.doc|所有檔案|*.
*"commondialog1.showopenrichtextbox1.text = "" '清空文字框filename = commondialog1.
filenamerichtextbox1.loadfile filenameme.caption = "超級記事本:
" & filenameend sub
private sub qk_click()richtextbox1.text = ""
end sub
5、注意:開啟txt檔案時正常的,但是開啟word是亂碼,因為word的儲存方式跟txt檔案不一樣的,這個是正常的。
4樓:匿名使用者
文字框通常用來顯示文字字元,以下是用 vb 編寫的開啟某 txt 檔案,並把檔案內容顯示在文字框的步驟及**:
1、新增必要的元件(文字框、按鈕)
2、設定屬性:
3、編寫按鈕的響應**:
**如下:
private sub command1_click()dim a$
text1.text = ""
open "d:\test.txt" for input as #1doinput #1, a
text1.text = text1.text & a & vbcrlf
loop until eof(1)
close #1
end sub
執行結果:
5樓:
dim str as string '定義個 str 用來儲存讀取的文字
open "路徑" for input as #1 '開啟指定路徑的文字
input #1, str '將指定文字讀取到 str 變數
close #1 '關閉檔案
text1.text = str '讓text1 等於 str 變數的內容
**要簡潔.. 才精緻
本來是很簡單的東西樓上幾位還搞了個迴圈來讀,真是浪費系統資源
6樓:白費電
單擊選單「工程」-「部件」,在彈出的「部件」對話方塊裡找到公共對話方塊microsoft common dialog 6.0並選中它,單擊「確定」按鈕。
在工具-選單編輯器 標題寫檔案(f),名字檔案,再點下下一個,標題寫開啟,名字開啟,再點下向右的箭頭
private sub 開啟_click()
with commondialog1
.dialogtitle = "開啟檔案"
.filter = "文字檔案 (*.txt)|*.txt|(*.doc)|*.doc|所有檔案|*.*"
.filterindex = 0
.showopen
dim tmploadstr as string
open .filename for input as #1
do while not eof(1)
line input #1, tmploadstr
text1.text = text1.text & tmploadstr & vbcrlf
loop
close #1
end with
end sub
7樓:匿名使用者
open "c:\123.txt" for input as #1do while not eof(1)
line input #1, mystringtext1.text = text1.text & mystring & vbcrlf
loop
close #1
這樣才對吧。。
開啟和excel輸入文字時候就出現對話方塊無法儲存
這個是你非正常關閉程式或者電腦所致,你可以將這個檔案不自動更正,刪除後重新開啟。看看是不是檔案中被設定只讀了,要是的話把只讀前面勾去掉就行了 1.關掉所有office,如果是ready only被勾選,去掉,再開啟就好了。2.原因是 使用者把路徑下面的檔案 ms01033.acl 屬性設定為只讀了,...
怎麼在vb中限定文字框大小,讓文字自動換行
在窗體設計過程中,使multiline true scrollbars 2就可以了。但不能在程式執行中改變這兩個屬性 1 在設計狀態下 把文字框的 multiline 屬性 設為true,就是允許文字框可以顯示多行文字。2 如果版 內容較多時把權scrollbars設為 2 vertical,這樣可...
VB在文字框中輸入字母,單擊button1,轉換為大寫字母,單擊button2,轉換為小寫字母
這樣可以不?private sub command1 click dim x as string dim y as string dim s as string x text1.text if option1.value true thenfor i 1 to len x y mid x,i,1 i...