If Left(strLineinputted, 1) = "[" And Right(strLineinputted, 1) = "]" Then
    strObject = strLineinputted: Seek #1, (Seek(1) - Len(strLineinputted) - 2): Exit Do
变量均为字符串。
多谢!

解决方案 »

  1.   

    If Left(strLineinputted, 1) = "[" And Right(strLineinputted, 1) = "]" Then 
    '如果从字串strLineinputted左边第一个字符是[,最后一个字符是]
        strObject = strLineinputted: Seek #1, (Seek(1) - Len(strLineinputted) - 2): Exit Do 
    '那么,把字串strLineinputted,赋给变量strObject,返回#1号文件的读写位置并退出循环
      

  2.   

    If Left(strLineinputted, 1) = "[" And Right(strLineinputted, 1) = "]" Then 
    '如果从字串strLineinputted左边第一个字符是[,最后一个字符是] 
        strObject = strLineinputted: Seek #1, (Seek(1) - Len(strLineinputted) - 2): Exit Do 
    '那么,把字串strLineinputted,赋给变量strObject,定位#1号文件的读写位置并退出循环我给加进去
    :)