1506496188(1).jpg (32 KB, 下载次数: 725)
Program Main
Implicit None
Character(len=1024) :: c
integer :: k
Open(12,File="文件名.csv")
Open(13,File="输出文件名.csv")
Do
Read(12,'(a1024)',iostat=k) c
if( k /= 0 ) exit
if( index( c , '2017/3' ) > 0 ) write(13,'(a)') trim(c)
End Do
Close(12)
End Program Main
fcode 发表于 2017-9-28 08:04
是否含有汉字,并不影响本问题。
以筛选 2017 年 3 月为例:
[mw_shl_code=fortran,true]Program Main

但是我试了一下,运行出来的文件是空的,会不会因为我的数据太大了(600多兆),我想挑选的是有比如说2014年12月,2015年1-5月,12月2016年1-5月,12月,2017年1-5月,要怎么弄呢,希望不要嫌弃我这个小白
fcode 发表于 2017-10-6 10:00
并不是因为文件太大。
可能的原因是:
,所以才怀疑是不是文件太大了,还是字符串定义的小了
程序是这样的@%(SZ_6R_BU{FZ$UAJS`I~F.png (12.59 KB, 下载次数: 700)
1]}M$OX%L4E(_X4V0%FS$CN.png (15.56 KB, 下载次数: 685)
fcode 发表于 2017-10-8 11:18
我这里没有你的数据,我自己编纂了几行数据来测试,是OK的。
数据量大,本身并不是问题。但数据量大,可能 ...
| 欢迎光临 Fortran Coder (http://bbs.fcode.cn/) | Powered by Discuz! X3.2 |