以文本方式查看主题 - Fortran中文网 (http://fortran.cn/bbs/index.asp) -- Fortran语言使用经验交流 (http://fortran.cn/bbs/list.asp?boardid=2) ---- [原创]使用字符转成ASCII码数值函数IACHAR错在哪? (http://fortran.cn/bbs/dispbbs.asp?boardid=2&id=2369) |
-- 作者:大胆想 -- 发布时间:2011/5/17 15:06:50 -- [原创]使用字符转成ASCII码数值函数IACHAR错在哪? 使用字符转成ASCII码数值函数IACHAR错在哪? ! - - - - - - - - - - - - - - - - - - - SUBROUTINE CHTOIN(IFIRST,LAST,IFROM,ITO) ! 将字符转成ASCII数 IMPLICIT NONE INTEGER*4 I,IFIRST,ITO(*),J,LAST CHARACTER*1 C(1),IFROM(*) DO I=IFIRST,LAST C(1:1)=IFROM(I:I) J=IACHAR(C) ITO(I)=J ENDDO RETURN; END ! - - - - - - - - - - - - - - - - - - - Compiling Fortran... D:\\CRSCP\\crscsap.f90 D:\\CRSCP\\crscsap.f90(315) : Error: The shapes of the array expressions do not conform. [J] J=IACHAR(C) -------^ Error executing df.exe. crscsap.obj - 1 error(s), 0 warning(s) 使用字符转成ASCII码数值函数IACHAR错在哪? 使用字符转成ASCII码数值函数IACHAR错在哪? |
-- 作者:大胆想 -- 发布时间:2011/5/17 15:08:20 -- 下面几行如下: --------------------Configuration: CR - Win32 Release-------------------- Compiling Fortran... D:\\CR\\csap.f90 D:\\CR\\csap.f90(315) : Error: The shapes of the array expressions do not conform. [J] J=IACHAR(C) -------^ Error executing df.exe. crscsap.obj - 1 error(s), 0 warning(s) |
-- 作者:大胆想 -- 发布时间:2011/5/17 15:12:09 -- 不用J时,也报同样错 D:\\CR\\csap.f90(316) : Error: The shapes of the array expressions do not conform. [ITO] ITO(I)=IACHAR(C) -------^ Error executing df.exe. csap.obj - 1 error(s), 0 warning(s) 烦请高手解答 |
-- 作者:tsz2008 -- 发布时间:2011/5/21 20:30:56 -- 把J=IACHAR(C) 改成 J=IACHAR(C(1)) |