想请教一下各位， 我目前有一个档案，是数字跟字串混和 有点像这样的格式： 字串行........ 字串 数字 数字 数字 字串 数字 数字 数字 字串 数字 数字 数字 字串行 字串行 字串 字串 字串 数字 字串 字串 字串 数字 字串 字串 字串 数字 . . . . . 字串行 因为是字串跟数字混合的格式，读取有点麻烦， 所以我一开始想说全部用字串的型态读入， e.g. character(len=20):: var_1, var_2, var_3, var_4 read(unit=fileid, fmt=*), var_1, var_2, var_3, var_4 最後再拿出字串型态的"数字"，转变回数字型态在做运算。 可是我现在卡在，不知道要如何将字串型态的数字， 转变回数字型态............ 我有想到一个方法，就是将这些字串型态的数字，写到另一个暂存档， 再用数字型态给他读回来....... 不过这样有点麻烦， 想请问一下有没有更简便的方式， 可以直接将字串型态的数字，直接转变为数字型态？ 我找到解决方法了，利用内部档（internal file)的方式 字串转数字： character(len=20):: string real(kind=8):: number read(string,fmt=*) number 数字转字串: character(len=20):: string real(kind=8):: number write(unit=string, fmt=*) number -- 我明白时间就像乳沟一样，挤一挤还是有的，不过我却无法挤出时间来陪你。 你曾给我最後机会，让我挽回。可我却不了解机会就像老二一样紧握就会变大的道理。 以致於你如同肛门的口的大便离我而去............ 我知道我给你的承诺太多，如同一句干你娘永远做不到， 至今对你的思念有一股蛋蛋的哀伤.... --

※ 发信站: 批踢踢实业坊(ptt.cc) ◆ From: 140.136.176.152 ※ 编辑: sexyrickysky 来自: 140.136.176.152 (08/16 19:25)