设为首页收藏本站如何选择编译器？在线F77转F90 繁体浏览

切换到窄版开启辅助访问

Fortran Coder»论坛 › 研讨区 › Fortran语法讨论 › 按行读取TXT文件，给多个参数赋值。

返回列表发新帖

查看: 6775|回复: 2

上一主题

下一主题

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

79 帖子	17 主题	0 精华

齊天大聖

F 币: 433 元
贡献: 266 点

发消息

楼主

发表于 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

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

回复支持反对

使用道具举报

返回列表发新帖

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-5-8 00:21

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表