| 查看: 1663 | 回复: 11 | ||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||
yazhouqin木虫 (小有名气)
|
[求助]
fortran如何查找带空格的字符串
|
|
|
请教：如果dat文件中有“NODE FOOT-”字符串，我想用fortran程序查找到它，应该怎么写呢？ 我这样写好像不行 CHARACTER*80 BUFF READ(11,*) BUFF IF(BUFF=="NODE FOOT_"  THEN主要是字符间存在空格，请问怎么办 |
回复此楼» 猜你喜欢
材料考研调剂
已经有3人回复
-
材料调剂
已经有12人回复
-
英一数一408，总分284，二战真诚求调剂
已经有14人回复
-
085410 一志愿211 22408分数359求调剂
已经有4人回复
-
271求调剂
已经有19人回复
-
385分 生物学（071000）求调剂
已经有3人回复
-
一志愿安徽大学计算机科学与技术学硕，331分求调剂
已经有3人回复
-
318求调剂，计算材料方向
已经有8人回复
-
291求调剂
已经有25人回复
-
一志愿北京科技大学085601材料工程英一数二初试总分335求调剂
已经有6人回复
11楼2015-11-10 12:59:44
【答案】应助回帖
★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与，应助指数 +1
yazhouqin: 金币+20 2015-11-10 09:54:13
感谢参与，应助指数 +1
yazhouqin: 金币+20 2015-11-10 09:54:13
|
按你的描述，应该是“NODE FOOT-”字符串的位置固定在该行的最左端。 这样的话，你的判断条件改成以下格式就行了： if(buff(1:10)=='NODE FOOT-')then 也就是截取字符串的1-10个字符进行判断，而非整个字符串进行判断。因为buff这个字符串长度为80，肯定不等于一个长度为10的字符串。 如果NODE FOOT-在行中的位置不固定就稍微麻烦点，先用index函数定位NODE FOOT-在字符串中的位置，然后从返回值位置开始往后推9个字符，以这个长度为10的子串来判断。 |
2楼2015-11-09 18:13:18
3楼2015-11-09 18:14:52
yazhouqin
木虫 (小有名气)
- 应助: 2 (幼儿园)
- 金币: 3413.7
- 红花: 1
- 帖子: 198
- 在线: 417小时
- 虫号: 725715
- 注册: 2009-03-18
- 性别: GG
- 专业: 岩土与基础工程
4楼2015-11-10 10:10:47
