字符串连接不了？大佬们帮忙看看是啥问题

芥子纳须弥

[Fortran] 纯文本查看 复制代码

!=====================================
!        整型或实型转换生字符，借助Fortran内部文件完成，
!        即将一个字符串变量当作一个内部文件看待；反之依然
!=====================================
    program main
   implicit none
   character(len=40) :: aa,bb,cc='2007.00',CID
   integer(kind=4) :: a

!...数字转换成字符串
   a=2007
   aa="2007"
   !...整型转字符
   write(bb,"(I4)") a     !...a -> bb
   CID = bb//aa//cc
   write(*,*) TRIM(ADJUSTL(CID))

   stop
   end program main

结果只有bb输出来了，后面的aa和cc输出不来？

芥子纳须弥

Transpose 发表于 2021-12-13 21:26
字符串本身长度是40,会在后 ...

是这样，谢谢