主题:关于使用read命令读取文件后跳出的问题
小可不才,使用的是CVF6.6编译器,在变成的过程中遇到些问题,苦苦思索不得其道,先向广大编程前辈求教,程序如下:
open(11,file='d:\data\beiking\'//wjm)
n=0
do while (.true.)
read(11,'(a)',end=100)neir
n=n+1
end do
100 continue
rewind(11)
下面的部分是使用do循环来控制读写11号文件,没有问题,不做讨论。主要的问题在于上面这段代码中第四行read(11,'(a)',end=100)中的end=100,本人在编写其他程序的时候发现有的程序需要使用它来跳出读取,有的程序又不需要,那么请教各位高手,在什么样的情况下需要使用end=100,100 continue这样的行代码来跳出?为什么?[em12]
open(11,file='d:\data\beiking\'//wjm)
n=0
do while (.true.)
read(11,'(a)',end=100)neir
n=n+1
end do
100 continue
rewind(11)
下面的部分是使用do循环来控制读写11号文件,没有问题,不做讨论。主要的问题在于上面这段代码中第四行read(11,'(a)',end=100)中的end=100,本人在编写其他程序的时候发现有的程序需要使用它来跳出读取,有的程序又不需要,那么请教各位高手,在什么样的情况下需要使用end=100,100 continue这样的行代码来跳出?为什么?[em12]