vb點虐 如何保存項目 vb中保存文件的代碼

VB點虐 怎樣保存文件

保存文件的步驟為：

成都創(chuàng)新互聯(lián)提供高防服務(wù)器、云服務(wù)器、香港服務(wù)器、四川移動機房托管等

關(guān)閉流，特別是寫入流

關(guān)閉并保存文件

示例代碼如下：

Imports?System.Windows.Forms

Imports?System.IO

Imports?System.Text

Sub?SaveFileDemo()

'打開文件。如果文件不存在則創(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("白刃格斗英雄連英模部隊方隊亮相閱兵")

'關(guān)閉流

tw.Close()

'關(guān)閉文件并保存文件

myFile.Close()

End?Sub

用VB.NET做的可視化軟件怎樣保存

運行后，就可以直接用了，你在當前項目的目錄下找到（下面是VS2005，查詢數(shù)據(jù)庫程序，是當前項目）

D:\我的文檔\Visual Studio 2005\Projects\查詢數(shù)據(jù)庫程序\查詢數(shù)據(jù)庫程序\bin\Debug\

這個目錄下，有個exe應用程序文件，在Windows操作系統(tǒng)中可以直接使用??！

VB如何將程序的數(shù)據(jù)保存？

VB6.0

寫入：

Open "D:\123.txt" For Output As #1 '打開XXX路徑的XXX文件（雙引號里表示文件位置和文件名）

Print #1, Text1.Text '寫入Text1的Text內(nèi)容

Close #1 '關(guān)閉

讀?。?/p>

Open "D:\123.txt" For Input As #1 '打開打開XXX路徑的XXX文件（雙引號里表示文件位置和文件名）

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點虐 中讀寫文件主要使用System.IO命名空間。

① 使用?File.ReadAllText 讀取

Dim s As String = System.IO.File.ReadAllText("C:\a.txt")

② 使用 StreamReader 讀取，注意編碼格式和寫入的編碼保持一致。

Dim sr As StreamReader = New StreamReader("C:\a.txt", System.Text.Encoding.UTF8)

Dim s As String = sr.ReadToEnd()

sr.Close()

文章標題：vb點虐 如何保存項目 vb中保存文件的代碼
標題URL：http://muchs.cn/article48/ddiepep.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供企業(yè)建站、域名注冊、網(wǎng)站建設(shè)、、外貿(mào)網(wǎng)站建設(shè)、營銷型網(wǎng)站建設(shè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)