版块导航
正在加载中...
客户端APP下载
论文辅导
申博辅导
登录
注册
帖子
帖子
用户
本版
应《网络安全法》要求,自2017年10月1日起,未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用,请尽快对帐号进行手机号验证,感谢您的理解与支持!
24小时热门版块排行榜
>
论坛更新日志
(1916)
>
虫友互识
(378)
>
论文投稿
(78)
>
博后之家
(43)
>
公派出国
(32)
>
基金申请
(29)
>
硕博家园
(23)
>
休闲灌水
(20)
>
论文道贺祈福
(15)
>
考博
(15)
>
导师招生
(13)
>
找工作
(13)
>
教师之家
(10)
>
文献求助
(7)
>
考研
(6)
>
招聘信息布告栏
(3)
小木虫论坛-学术科研互动平台
»
计算模拟区
»
程序语言
»
Fortran
»
用fortran怎么读.CSV文件
12
2/2
返回列表
上一页
1
2
查看: 5727 | 回复: 11
只看楼主
@他人
存档
新回复提醒
(忽略)
收藏
在APP中查看
virtualzx
木虫
(著名写手)
应助: 263
(大学生)
金币: 7161.3
红花: 54
帖子: 1605
在线: 317.6小时
虫号: 2069080
注册: 2012-10-18
性别: GG
专业: 理论和计算化学
【答案】应助回帖
★
906527107: 金币+1,
★★★★★
最佳答案
2013-11-27 12:14:42
引用回帖:
10楼
:
Originally posted by
906527107
at 2013-11-26 03:08:15
谢谢您的回复!现在已经用fortran读出了.csv文件。
但是我现在有上百个相同格式的文件(.csv),文件名称分别为temp1.csv~temp50.csv,请问怎样才能一次将这些文件全部读进去?
求程序!...
设立一个do循环,依次读取就行了
integer :: i
character(len=4) :: indstr
integer,parameter:: uid=...
do i=1,9999
write(indstr,"(I4)"
indstr
open(file="temp"//trim(adjust(indstr))//".csv",unit=uid)
读入数据
close(uid)
end do
赞
一下
回复此楼
11楼
2013-11-27 07:08:22
已阅
回复此楼
关注TA
给TA发消息
送TA红花
TA的回帖
806940059
新虫
(初入文坛)
应助: 0
(幼儿园)
金币: 0.5
帖子: 17
在线: 16.8小时
虫号: 2851190
注册: 2013-12-05
目测楼主也是搞ABAQUS二次开发且搞温度场分析的,,对不对??我这刚入手、、、被老板讲解的头都大了
参考你们讨论的内容学得经验了,谢谢!!
赞
一下
回复此楼
12楼
2014-05-07 11:29:15
已阅
回复此楼
关注TA
给TA发消息
送TA红花
TA的回帖
相关版块跳转
第一性原理
量子化学
计算模拟
分子模拟
仿真模拟
程序语言
我要订阅楼主
906527107
的主题更新
12
2/2
返回列表
上一页
1
2
如果回帖内容含有宣传信息,请如实选中。否则帐号将被全论坛禁言
普通表情
龙
兔
虎
猫
百度网盘
|
360云盘
|
千易网盘
|
华为网盘
在新窗口页面中打开自己喜欢的网盘网站,将文件上传后,然后将下载链接复制到帖子内容中就可以了。
信息提示
关闭
请填处理意见
关闭
确定