LineInput 函数

更新：2007 年 11 月

从打开的顺序文件中读取一行数据并将它赋给 String 变量。

Public Function LineInput(ByVal FileNumber As Integer) As String

参数

• FileNumber
  必需。任何有效文件号。

异常

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

备注

提供 LineInput 函数是为了实现向后兼容性，可能会影响性能。对于非旧式应用程序，My.Computer.FileSystem 对象将提供更好的性能。有关更多信息，请参见 使用 Visual Basic 访问文件。

用 LineInput 读取的数据通常由 Print 写入文件。

安全说明：
从文件读取数据时，请不要根据文件扩展名判断文件的内容。例如，名为 Form1.vb 的文件不一定就是 Visual Basic 源文件。

LineInput 函数一次从文件读取一个字符，直到遇到回车 (Chr(13)) 或回车/换行 (Chr(13) + Chr(10)) 序列。回车/换行序列被跳过而不是附加到字符字符串上。

安全说明：
使用 LineInput 函数读取文件时，要求具备 FileIOPermissionAccess 枚举的 Read 访问权限。

示例

本示例使用 LineInput 函数从顺序文件中读取一行数据并将它赋给变量。本示例假设 TestFile 是包含几行示例数据的文本文件。

Dim TextLine As String
' Open file.
FileOpen(1, "TESTFILE", OpenMode.Input)
' Loop until end of file.
While Not EOF(1)
   ' Read line into variable.
   TextLine = LineInput(1)
   ' Print to the console.
   WriteLine(1, TextLine)
End While
FileClose(1)

智能设备开发人员说明

不支持此函数。

要求

命名空间：Microsoft.VisualBasic

**模块：**FileSystem

**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）

请参见

任务

如何：在 Visual Basic 中使用 StreamWriter 向文件中写入文本

如何：在 Visual Basic 中向文件内写入文本

参考

Chr、ChrW 函数

Input 函数

其他资源

使用 Visual Basic 访问文件