很好很实用! 今天使用发现有一个小问题(VS2013+Intel Fortran2015): 如果按照“If( ierr /= 0 ) Exit”来作为退出机制,当文件中有空行时候会被跳过,这样得不到文件的真实行数。 建议还是使用 Read( iFileUnit , * , End = 999, Err = 999 ) 999 Rewind( iFileUnit ) 这样比较好~