按行读取TXT文件，给多个参数赋值。

lovelyHelen · 发表于 2018-10-8 19:13:12

本帖最后由 lovelyHelen 于 2018-10-8 19:20 编辑

8个输入参数，通过excel文件赋值。excel文件有8列，对应8个参数，有几万行，一行对应一组输入参数。读取一行，计算一个结果，需要读取完所有行，把所有计算结果存到一个文件。

li913 · 发表于 2018-10-11 09:42:31

fortran读取excel比较困难，建议另存为csv再读取。读文件是基本操作，书上有介绍。

lookbook · 发表于 2018-11-8 14:46:44

open(num,file='excel.txt',iostat=var)
if(var.ne.0) stop

do
read(num,*,iostat=var) a(1:8)
if(var<0) exit

balabala......

enddo

不确定都对，但你可以试试

[文件读写] 按行读取TXT文件，给多个参数赋值。