在Fortran中，若想要将整型或实型数据转换为字符，则应用内部文件write和read即可实现。

示例代码：
!=====================================
!         整型或实型转换生字符，借助Fortran内部文件完成，
!         即将一个字符串变量当作一个内部文件看待；反之依然
!=====================================
    program main

    implicit none
    character(len=20) :: aa="2007",bb,cc='2007.00',dd
    integer(kind=4) :: a=2007,b
    real(kind=8) :: c=2007.00,d

!...数字转换成字符串

    !...整型转字符

    write(bb,"(I4)") a      !...a -> bb

    write(*,*) bb,a

    !...实型转字符

    write(dd,"(f10.4)") c    !...c -> dd

    write(*,*) dd,c

!...字符转换数字

   !...字符转整型

   read(aa,'(I4)') b        !...aa -> b

   write(*,*) aa,b

   !...字符转实型

   read(cc,'(F10.4)') d      !...cc -> d        

   write(*,*) cc,d

   stop

   end program main

!program main
!!=====================================
!!         整型或实型转换生字符，借助Fortran内部文件完成，
!!         即将一个字符串变量当作一个内部文件看待；反之依然
!!=====================================
!    implicit none
!    character(len=20) :: Ctemp
!    integer(kind=4) :: k
!!   
!!...trim和adjustl是Fortran内部标准函数；adjustl作用是将字符串内容左对齐，
!!...空格置于右端；trim作用是将字符串末尾（即右端）空格删掉；符号“//”是字符串
!!...连接操作符，作用是将字符串连接起来
!!
!    do k=1,20,1
!        write(Ctemp,"(I2)") k
!        open(unit=3,file='myfile'//trim(adjustl(Ctemp))//'.dat',status='new')
!        close(3)
!    end do
!   
!    stop
!end program main