FileWidth 函数

项目
08/18/2008

更新：2007 年 11 月

将输出行宽度分配给用 FileOpen 函数打开的文件。

Public Sub FileWidth( _
      FileNumber As Integer, _
      RecordWidth As Integer _
)

参数

FileNumber
必需。任何有效文件号。
RecordWidth
必需。范围在 0 到 255 之间（包括 0 和 255）的数值表达式，指示在一行的长度达到多少个字符后换行。如果 RecordWidth 等于 0，则行的长度不受限制。RecordWidth 的默认值为 0。

异常

异常类型	错误号	条件
IOException	52	FileNumber 不存在。
IOException	54	文件模式无效。

如果正在升级使用非结构化错误处理方式的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象）比较错误号。）然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述替换这种错误控制。

备注

此函数将输出行宽度分配给使用 FileOpen 函数打开的文件。

示例

本示例用 FileWidth 函数设置文件的输出行宽度。

Dim i As Integer
FileOpen(1, "TESTFILE", OpenMode.Output) ' Open file for output.
FileWidth(1, 5)   ' Set output line width to 5.
For i = 0 To 9   ' Loop 10 times.
   Print(1, Chr(48 + I))   ' Prints five characters per line.
Next
FileClose(1)   ' Close file.