InputString 函数
更新：2007 年 11 月
返回 String 值，该值包含以 Input 或 Binary 模式打开的文件中的字符。
在文件 I/O 操作中，My 功能具有比 InputString 更高的效率和更好的性能。有关更多信息，请参见 My.Computer.FileSystem 对象。
InputString(_
ByVal FileNumber As Integer, _
ByVal CharCount As Integer _
) As String
参数
FileNumber
必需。任何有效文件号。CharCount
必需。任何指定要读取的字符个数的有效数值表达式。
异常
异常类型 |
错误号 |
条件 |
|---|---|---|
FileNumber 不存在。 |
||
CharCount < 0 或 > 214。 |
如果正在升级使用非结构化错误处理方式的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象） 比较错误号。） 然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述 替换这种错误控制。
备注
提供 InputString 函数是为了实现向后兼容性，可能会影响性能。对于非旧式应用程序，My.Computer.FileSystem 对象将提供更好的性能。有关更多信息，请参见 使用 Visual Basic 访问文件。
用 InputString 函数读取的数据通常由 Print 或 FilePut 写入文件。仅将此函数用于以 Input 或 Binary 模式打开的文件。
与 Input 函数不同，InputString 函数返回它读取的所有字符，包括逗号、回车符、换行符、引号和前导空格等。
对于以 Binary 访问模式打开的文件，如果试图在 EOF 返回 True 之前用 InputString 函数读取整个文件，则会产生错误。在用 InputString 读取二进制文件时，使用 LOF 和 Loc 函数代替 EOF 函数，在使用 EOF 函数时则使用 FileGet。
.gif "安全说明") 安全说明： |
|---|
从文件读取数据时，请不要根据文件扩展名判断文件的内容。例如，名为 Form1.vb 的文件不一定就是 Visual Basic 源文件。 |
示例
本示例使用 InputString 函数从文件中一次读取一个字符，并将它输出到 Output 窗口。本示例假设 MyFile 是包含几行示例数据的文本文件。
Dim oneChar As String
' Open file.
FileOpen(1, "MYFILE.TXT", OpenMode.Input)
' Loop until end of file.
While Not EOF(1)
' Get one character.
oneChar = (InputString(1, 1))
' Print to the output window.
System.Console.Out.WriteLine(oneChar)
End While
FileClose(1)
智能设备开发人员说明
不支持此函数。
要求
**模块：**FileSystem
**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）
请参见
任务
如何：在 Visual Basic 中使用 StreamWriter 向文件中写入文本