最簡單的方法是用內部檔案，即用字元變數作為檔案。

下面程式段讀取系統時間，存入字元變數now，再將now的時分秒轉換為整數值讀出。

program TimeNow
   character*8 :: now
   integer     :: hh,mm,ss

   call time (now)     ! 讀系統時間
   write(*,*) now      ! 寫出時間字串

   ! 用字元變數now作為內部檔案，從中將時、分、秒作為整數讀出
   read(now,"(I2,1x,I2,1x,I2)") hh,mm,ss      ! 字元轉換為
   write(*,*) hh,mm,ss          ! 寫出時、分、秒的整數值

   stop
end program TimeNow

以此類推，將整型轉換字串為

      write(now,"(2I1,1H:,2I1,1H:,2I1)") 0,1,3,5,0,5

其中，2I1表示0,1兩個整數，1H:表示字串":"。

螢幕輸出例：

將實數轉換為字串如下！

character(len=8) :: string
write(string,'(f7.4)') 54.34
write(*,*) string