Visual Basic.Net中的文件操作 2

把字符串写入文件

如果要向文件中写入数据，可以用Print/PrintLine函数，如果要写入的数据是字符串或是数值，则可以用Write/WriteLine函数，要写文件，应该先将文件以Output或Append方式打开，然后菜可以使用Print函数或Write函数。

Print/PrintLine函数：将格式化的显示数据写入顺序文件。

Public Sub Print( ByVal FileNumber As Integer, ByVal ParamArray Output() As Object)

Public Sub PrintLine( ByVal FileNumber As Integer, Val ParamArray Output() As Object )

其中参数FileNumber 是有效文件号，Output 是要写入文件的零个或更多个用逗号分隔的表达式。

示例：

FileOpen(1, " c:\example.txt ", OpenMode.Output)

Printline(1)

Printline(1,”Hello,”)

Print(1,spc(4),”World!”)

FileClose(1)

Write/Writeline和print/printline类似



2．随机文件的操作

随机访问文件中的字节构成相同的一些记录，每个记录包含一个或多个字段，对于一个字段的记录对应于任一标准类型，随机访问文件中的所有记录都必须具有相同长度，如果实际字符串包含的字符少于将它写入其中的字符串元素的固定长度，则 Visual Basic 用空白（字符代码 32）填充记录中的尾随空格。如果该字符串长于字段大小，则 Visual Basic 截断它。

示例：用户定义数据类型：

Structure Person

Public ID As Integer

Public MonthlySalary As Decimal

<VBFixedString(15)> Public Name As String

<VBFixedString(2)> Public Sex As String

End Structure

其中VBFixedString用于定义字符串为固定长度的字符串。

在打开一个文件进行随机操作访问前，应该定义一个类型该类型对应该文件已包含或未包含的记录。

打开要进行随机访问的文件：

FileOpen 函数：FileOpen(FileNumber, FileName, OpenMode.Random, , , RecordLength)

FileNumber 和 FileName 分别指定要打开的文件的编号和文件名。RecordLength 以字节为单位指定每条记录的大小。如果 RecordLength 小于写入文件的记录的实际长度，则会生成错误。

示例：打开随机访问的文件。

Dim FileNum as Integer ,RecLength as Long, Aperson as Per