Skip to content

Input # 语句

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

INFO

本页记录 Input # 语句。不相关的 Input 函数 从任何打开的文件读取固定数量的字符。

语法:

Input # filenumber , varlist

filenumber
任何有效的文件号。
varlist
逗号分隔的变量列表,从文件读取的值赋给这些变量。varlist 不能包含数组变量或对象变量。但描述数组元素或用户自定义类型的变量可以使用。

Input # 读取的数据通常用 Write # 写入文件。此语句仅用于以 InputBinary 模式打开的文件。读取时,标准字符串或数值数据不经修改赋值给变量。

下表说明了其他输入数据的处理方式:

数据赋给变量的值
分隔逗号或空行Empty
#NULL#Null
#TRUE##FALSE#TrueFalse
#yyyy-mm-dd hh:mm:ss#表达式表示的日期和/或时间
#ERROR errornumber#errornumber(变量为标记为错误的 Variant

输入数据中的双引号(")被忽略。

WARNING

不要为 Input # 语句编写包含嵌入引号的字符串(例如 "1,2""X");Input # 会将此字符串解析为两个完整独立的字符串。

文件中的数据项必须以 varlist 中变量的相同顺序出现,并与相同数据类型的变量匹配。如果变量是数值类型而数据不是数值类型,则将零值赋给变量。

如果在读取数据项时到达文件末尾,输入终止并发生错误。

INFO

要能够正确使用 Input # 将数据从文件读入变量,请使用 Write # 语句而非 Print # 语句将数据写入文件。使用 Write # 确保每个独立的数据字段被正确分隔。

示例

本示例使用 Input # 语句从文件读取数据到两个变量。本示例假设 TESTFILE 是使用 Write # 语句写入几行数据的文件;即每行包含引号中的字符串和用逗号分隔的数字,如 "Hello", 234

vb
Dim MyString, MyNumber
Open "TESTFILE" For Input As #1    ' Open file for input.
Do While Not EOF(1)    ' Loop until end of file.
    Input #1, MyString, MyNumber    ' Read data into two variables.
    Debug.Print MyString, MyNumber    ' Print data to the Immediate window.
Loop
Close #1    ' Close file.

另请参阅

twinBASIC及其LOGO版权为作者"韦恩"所有