FileSystem.InputString(Int32, Int32) 方法

定义

返回 String 值,该值包含以 InputBinary 模式打开的文件中的字符。 相比 InputStringMy 功能可使文件 I/O 操作的效率更高、性能更好。 有关详细信息,请参阅 FileSystem

public:
 static System::String ^ InputString(int FileNumber, int CharCount);
public static string InputString (int FileNumber, int CharCount);
[System.Runtime.Versioning.UnsupportedOSPlatform("ios")]
[System.Runtime.Versioning.UnsupportedOSPlatform("macos")]
[System.Runtime.Versioning.UnsupportedOSPlatform("tvos")]
public static string InputString (int FileNumber, int CharCount);
static member InputString : int * int -> string
[<System.Runtime.Versioning.UnsupportedOSPlatform("ios")>]
[<System.Runtime.Versioning.UnsupportedOSPlatform("macos")>]
[<System.Runtime.Versioning.UnsupportedOSPlatform("tvos")>]
static member InputString : int * int -> string
Public Function InputString (FileNumber As Integer, CharCount As Integer) As String

参数

FileNumber
Int32

必需。 任何有效文件数。

CharCount
Int32

必需。 用于指定要读取的字符数的任何有效数值表达式。

返回

一个字符串,该字符串包含以 InputBinary 模式打开的文件中的字符。 相比 InputStringMy 功能可使文件 I/O 操作的效率更高、性能更好。

属性

例外

FileNumber 不存在。

CharCount< 0 或 > 214。

示例

此示例使用 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)

注解

提供 InputString 函数是为了向后兼容,可能会影响性能。 对于非旧应用程序, My.Computer.FileSystem 对象提供更好的性能。 有关详细信息,请参阅 Visual Basic 中的文件访问

使用 InputString 函数读取的数据通常通过使用 PrintFilePut写入文件。 仅将此函数用于在 或 Binary 模式下Input打开的文件。

Input与 函数不同InputString, 函数返回它读取的所有字符。 这包括逗号、回车符、换行符、引号和前导空格。

打开文件以供 Binary 访问时,尝试使用 InputString 函数读取文件,直到 EOF 返回 True ,将生成错误。 使用 和 Loc 函数,而不是EOF在使用 读取二进制文件时使用 InputString,或者在FileGet使用 函数时使用 EOFLOF

注意

从文件中读取时,不要根据文件扩展名对文件内容做出安全决策。 例如,名为 Form1.vb 的文件可能不是 Visual Basic 源文件。

适用于

另请参阅