VB6.0

創(chuàng)新互聯(lián)秉承實(shí)現(xiàn)全網(wǎng)價(jià)值營(yíng)銷(xiāo)的理念,以專(zhuān)業(yè)定制企業(yè)官網(wǎng),網(wǎng)站制作、成都網(wǎng)站制作,成都小程序開(kāi)發(fā),網(wǎng)頁(yè)設(shè)計(jì)制作,手機(jī)網(wǎng)站制作,成都全網(wǎng)營(yíng)銷(xiāo)幫助傳統(tǒng)企業(yè)實(shí)現(xiàn)“互聯(lián)網(wǎng)+”轉(zhuǎn)型升級(jí)專(zhuān)業(yè)定制企業(yè)官網(wǎng),公司注重人才、技術(shù)和管理,匯聚了一批優(yōu)秀的互聯(lián)網(wǎng)技術(shù)人才,對(duì)客戶(hù)都以感恩的心態(tài)奉獻(xiàn)自己的專(zhuān)業(yè)和所長(zhǎng)。
寫(xiě)入:
Open "D:\123.txt" For Output As #1 '打開(kāi)XXX路徑的XXX文件(雙引號(hào)里表示文件位置和文件名)
Print #1, Text1.Text '寫(xiě)入Text1的Text內(nèi)容
Close #1 '關(guān)閉
讀取:
Open "D:\123.txt" For Input As #1 '打開(kāi)打開(kāi)XXX路徑的XXX文件(雙引號(hào)里表示文件位置和文件名)
Do While Not EOF(1)
Line Input #1, s
Text1.Text = s
Loop 'Do...Loop表示循環(huán)讀取文件的內(nèi)容,并讓Text1.Text=內(nèi)容
Close #1 '關(guān)閉
VB.net中讀寫(xiě)文件主要使用System.IO命名空間。
① 使用?File.ReadAllText 讀取
Dim s As String = System.IO.File.ReadAllText("C:\a.txt")
② 使用 StreamReader 讀取,注意編碼格式和寫(xiě)入的編碼保持一致。
Dim sr As StreamReader = New StreamReader("C:\a.txt", System.Text.Encoding.UTF8)
Dim s As String = sr.ReadToEnd()
sr.Close()
保存文件的步驟為:
關(guān)閉流,特別是寫(xiě)入流
關(guān)閉并保存文件
示例代碼如下:
Imports?System.Windows.Forms
Imports?System.IO
Imports?System.Text
Sub?SaveFileDemo()
'打開(kāi)文件。如果文件不存在則創(chuàng)建新的文件
Dim?myFile?As?New?IO.FileStream("d:\data.txt",?_
FileMode.OpenOrCreate,?_
FileAccess.Write)
'在文件末尾添加一行?
Dim?tw?As?New?StreamWriter(myFile)
myFile.Seek(0,?SeekOrigin.End)
tw.WriteLine("白刃格斗英雄連英模部隊(duì)方隊(duì)亮相閱兵")
'關(guān)閉流
tw.Close()
'關(guān)閉文件并保存文件
myFile.Close()
End?Sub
可以用SaveFileDialog1對(duì)話框加上對(duì)文件數(shù)據(jù)操作的類(lèi)來(lái)實(shí)現(xiàn),,用richtextbox自己的屬性方法也能行!我以前做過(guò)一個(gè)記事本程序就是那樣的!
文件 - 打開(kāi)項(xiàng)目,打開(kāi)vbproj或sln
還有一種方法,打開(kāi)frmMain.vb、frmMain.Desigenr.vb(假定你的計(jì)算器主窗體文件為frmMain,用記事本打開(kāi)),在frmMain.vb中的 Public Class frmMain 這一句下面輸入:
#Region "Windows窗體設(shè)計(jì)器自動(dòng)生成的代碼"
#End Region
然后復(fù)制frmMain.Desigenr.vb的文件內(nèi)容到#Region和#End Region中間,建議另存為,在別的項(xiàng)目中添加這個(gè)文件,一樣可以編輯窗體
運(yùn)行后,就可以直接用了,你在當(dāng)前項(xiàng)目的目錄下找到(下面是VS2005,查詢(xún)數(shù)據(jù)庫(kù)程序,是當(dāng)前項(xiàng)目)
D:\我的文檔\Visual Studio 2005\Projects\查詢(xún)數(shù)據(jù)庫(kù)程序\查詢(xún)數(shù)據(jù)庫(kù)程序\bin\Debug\
這個(gè)目錄下,有個(gè)exe應(yīng)用程序文件,在Windows操作系統(tǒng)中可以直接使用!!
本文題目:vb.net如何另存項(xiàng)目,vb文件另存為
分享地址:http://chinadenli.net/article31/dseposd.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供虛擬主機(jī)、靜態(tài)網(wǎng)站、定制網(wǎng)站、網(wǎng)站策劃、外貿(mào)建站、App開(kāi)發(fā)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶(hù)投稿、用戶(hù)轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)