- 积分
- 1668
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2019-3-14
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
有一个很大的txt文档,里面包含了很多站点的资料,图贴在这里。现在我想把一些有用的站点资料提取出来,看了家园里的一些帖子,有了一点思路,但仍然很无措,所以想请教大家。第一次提问,也不知道格式对不对,谢谢大家。鞠躬了~~~
包含很多个站点的文档
我的思路:先把需要用到的站点号写在一个txt里,然后用循环依次读取这些有用的站点号给变量stationid;然后read这个很大的txt文档,判断每一行的前2-6个字符是不是需要的站点号,如果是 就输出到一个新的文档里,如果不是 就跳过。
do i=1,staid !staid表示需要用到的站点的数量
read(10,*)stationid(i)
open(11,file="zhandian.txt",status="old") !zhandian.txt就是这个很大的文档
read(11,"(a8)")char
if(char(2:6)==stationid(i))then
write(12,file="out.txt") 这里输出的时候我不知道该怎么写了
end if
end do
打扰大家了,恳求大家能给我这个小白一点点建议,非常感激
|
|