一个字符读入文件,如何判断已经换行?

Question

inChar = Input(1, #1)想用select case (inchar)case  在这里如何判断他是否换行了?

Answer 1

直接从文件中行读取多好啊，然后在从这个行字符串中分解字符
do while not eof(#1)
   line input #1,strLine
   do while len(strLine)>0
      inChar=left(strLine,1)
      select case inChar
             ...
             ...
      end select
     strLine=right(strLine,len(strLine)-1)
   loop
loop