VB.NET如何實(shí)現(xiàn)文件操作

這篇文章主要介紹VB.NET如何實(shí)現(xiàn)文件操作，文中介紹的非常詳細(xì)，具有一定的參考價(jià)值，感興趣的小伙伴們一定要看完！

VB.NET文件操作打開和關(guān)閉文件

1、順序文件
打開順序文件，我們可以使用Open語句。它的格式如下：

Open pathname For [Input |Output |Append] As [#]filenumber [Len = buffersize]

說明：
1）參數(shù)pathname 表示要打開的文件名，文件名可以包含有驅(qū)動(dòng)器和目錄
2）Input Output 和Append用于設(shè)置順序文件的打開方式。其中，Input表示從打開的文件中讀取數(shù)據(jù)。以這種方式打開文件時(shí)，文件必須存在，否則會(huì)產(chǎn)生錯(cuò)誤。Output表示向打開的文件中寫入數(shù)據(jù)。以這種方式打開文件時(shí)，文件中原有的數(shù)據(jù)將被覆蓋，新的數(shù)據(jù)將從文件開始寫入。如果文件不存在，則創(chuàng)建一個(gè)新文件。Append表示向打開的文件中添加數(shù)據(jù)。以這種方式打開時(shí)，文件中原有的數(shù)據(jù)將被保留，新的數(shù)據(jù)將從文件為開始添加。如果文件不存在，則創(chuàng)建一個(gè)新文件。
3）As[#]filenumber 子句用于為打開的文件指定文件號.對文件進(jìn)行讀寫操作時(shí),要用文件號表示該文件.文件號是介于1~511之間的整數(shù),既可以是數(shù)字,又可以是變量.也可以省略不用.
4)當(dāng)在文件與程序之間拷貝數(shù)據(jù)時(shí),Len=buffersize子句指定緩沖區(qū)的字符數(shù).
例如:

Open App.Path + "/test.dat" For Output As 1   Open App.Path + "/test.dat" For Output As 1

這兩句代碼在當(dāng)前應(yīng)用程序所在目錄下創(chuàng)建了一個(gè)名為test.dat的文本文件,分配文件號為1.

Open App.Path + "/test.dat" For Input As [#]filenumber

這條語句是從文本文件中讀取數(shù)據(jù).

Open App.Path + "/test.dat" For Append As [#]filenumber

這條語句則是像文本文件中添加數(shù)據(jù)

2、隨機(jī)文件
操作隨機(jī)文件之前,首先必須定義用于保存數(shù)據(jù)項(xiàng)的記錄類型.該記錄是用戶自定義數(shù)據(jù)類型,他們是隨機(jī)文件中存儲(chǔ)數(shù)據(jù)的基本結(jié)構(gòu).例如:

Type Student   No As Integer   Name As String * 20   age As Integer   End Type   Dim Stud As Student ‘定義一個(gè)可以存放學(xué)生材料的變量

隨機(jī)文件中,所有的數(shù)據(jù)都將保存到若干個(gè)結(jié)構(gòu)為Student類型的記錄中, 而從隨機(jī)文件中讀出的數(shù)據(jù)則可以存放到變量Stud中.
之后我們就可以打開并讀寫文件了.下面是打開隨機(jī)文件的語法格式:

Open filename For Random as [#]filenumber Len = Reclength

說明:
1)參數(shù)filename 和filenumber 分別表示文件名或文件號.
2)關(guān)鍵字Random 表示打開的是隨機(jī)文件
3)Len子句用于設(shè)置記錄長度,長度由參數(shù)Reclength指定.Reclength的值必須大于0,而且必須與定義的記錄結(jié)構(gòu)的長度一致.計(jì)算記錄長度的方法是將記錄結(jié)構(gòu)中每個(gè)元素的長度相加.例如前面聲明的Student的長度應(yīng)該是2+20+2=24字節(jié).
打開一個(gè)記錄類型為Student 的隨機(jī)文件的方法是:

Open "c:/Student.txt " For Random As #1 Len = 25

以上是“VB.NET如何實(shí)現(xiàn)文件操作”這篇文章的所有內(nèi)容，感謝各位的閱讀！希望分享的內(nèi)容對大家有幫助，更多相關(guān)知識，歡迎關(guān)注億速云行業(yè)資訊頻道！