请问用input#函数读入一个文本时:
如果文本为:
 121 AA
FFF33程序为:
dim a(3) as string,i as integer
input #1,a(0),a(1),a(2) 
i=0
for i=0 to 2
 label1(i).caption=a(i)
next i
为什么label框全没显示。从书上看“INPUT不是直到再次遇到空格、逗号或行尾时为止,接着将该数据存放到对应的变量中,然后再读下个数据项。”
为什么不显示,请教各位。

解决方案 »

  1.   

    Open 语句
          能够对文件输入/输出 (I/O)。语法Open pathname For mode [Access access] [lock] As [#]filenumber [Len=reclength]Open 语句的语法具有以下几个部分:部分 描述 
    pathname 必要。字符串表达式,指定文件名,该文件名可能还包括目录、文件夹及驱动器。 
    mode 必要。关键字,指定文件方式,有 Append、Binary、Input、Output、或 Random 方式。如果未指定方式,则以 Random 访问方式打开文件。 
    access 可选。关键字,说明打开的文件可以进行的操作,有 Read、Write、或 Read Write 操作。 
    lock 可选。关键字,说明限定于其它进程打开的文件的操作,有 Shared、Lock Read、Lock Write、和 Lock Read Write 操作。 
    filenumber 必要。一个有效的文件号,范围在 1 到 511 之间。使用 FreeFile 函数可得到下一个可用的文件号。 
    reclength 可选。小于或等于 32,767(字节)的一个数。对于用随机访问方式打开的文件,该值就是记录长度。对于顺序文件,该值就是缓冲字符数。 
    说明对文件做任何 I/O 操作之前都必须先打开文件。Open 语句分配一个缓冲区供文件进行 I/O 之用,并决定缓冲区所使用的访问方式。如果 pathname 指定的文件不存在,那么,在用 Append、Binary、Output、或 Random 方式打开文件时,可以建立这一文件。如果文件已由其它进程打开,而且不允许指定的访问类型,则 Open 操作失败,而且会有错误发生。如果 mode 是 Binary 方式,则 Len 子句会被忽略掉。重要 在 Binary、Input 和 Random 方式下可以用不同的文件号打开同一文件,而不必先将该文件关闭。在 Append 和 Output 方式下,如果要用不同的文件号打开同一文件,则必须在打开文件之前先关闭该文件。
      

  2.   

    Input # 语句
          从已打开的顺序文件中读出数据并将数据指定给变量。语法Input #filenumber, varlistInput # 语句的语法具有以下几个部分:部分 描述 
    filenumber 必要。任何有效的文件号。 
    varlist 必要。用逗号分界的变量列表,将文件中读出的值分配给这些变量;这些变量不可能是一个数组或对象变量。但是,可以使用变量描述数组元素或用户定义类型的元素。 
    说明通常用 Write # 将 Input # 语句读出的数据写入文件。该语句只能用于以 Input 或 Binary 方式打开的文件。在读出数据时不经修改就可直接将标准的字符串或数值数据指定给变量。下表说明如何处理其它输入数据:数据 指定给变量的值 
    分隔逗号或空白行 Empty 
    #NULL# Null 
    #TRUE# or #FALSE# True 或 False 
    #yyyy-mm-dd hh:mm:ss# 用表达式表示的日期与/或时间 
    #ERROR errornumber# errornumber(此变量是一个 Variant,用来标记错误) 
    输入数据中的双引号符号 (" ") 将被忽略。文件中数据项目的顺序必须与 varlist 中变量的顺序相同,而且与相同数据类型的变量匹配。如果变量为数值类型而数据不是数值类型,则指定变量的值为零。在输入数据项目时,如果已到达文件结尾,则会终止输入,并产生一个错误。注意 为了能够用 Input # 语句将文件的数据正确读入到变量中,在将数据写入文件时,要使用 Write # 语句而不使用 Print # 语句。使用 Write # 语句可以确保将各个单独的数据域正确分隔开。
      

  3.   


    Input 函数
          返回 String,它包含以 Input 或 Binary 方式打开的文件中的字符。语法Input(number, [#]filenumber)Input 函数的语法具有以下几个部分:部分 描述 
    number 必要。任何有效的数值表达式,指定要返回的字符个数。 
    filenumber 必要。任何有效的文件号。 
    说明通常用 Print # 或 Put 将 Input 函数读出的数据写入文件。Input 函数只用于以 Input 或 Binary 方式打开的文件。与 Input # 语句不同,Input 函数返回它所读出的所有字符,包括逗号、回车符、空白列、换行符、引号和前导空格等。对于 Binary 访问类型打开的文件,如果试图用 Input 函数读出整个文件,则会在 EOF 返回 True 时产生错误。在用 Input 读出二进制文件时,要用 LOF 和 Loc 函数代替 EOF 函数,而在使用 EOF 函数时要配合以 Get 函数。注意 对于文本文件中包含的字节数据要使用 InputB 函数。对于 InputB 来说,number 指定的是要返回的字节个数,而不是要返回的字符个数。
      

  4.   

    ' 假设文件存在c:\123.txt。Option ExplicitPrivate Sub Command1_Click()
        Dim i As Integer, strTemp As String, strInput As String
        Open "c:\123.txt" For Input As #1
            Do Until EOF(1)
                Input #1, strInput
                strTemp = strTemp & strInput & vbCrLf
            Loop
        Close #1
        Label1.Caption = strTemp
    End Sub