【求助】关于调用函数库存子程序的问题

angel1999

在我的程序中用到函数（内部库存函数）
  
CALL CLEAR_SCREEN
CALL DATE_TIME_SEED
  
编译时能通过，但连接时出现这样的错误：
  
genetic.obj : error LNK2001: unresolved external symbol _CLEAR_SCREEN@0
genetic.obj : error LNK2001: unresolved external symbol _DATE_TIME_SEED@0
genetic.obj : error LNK2001: unresolved external symbol _RANDOM@0
Debug/genetic.exe : fatal error LNK1120: 3 unresolved externals
  
不明白为什么会出现这样的错误？
  
肯请高手指教

苍山负雪

什么库？链接的时候没有找到库吧

angel1999

我不清楚 CLEAR_SCREEN 及DATE_TIME_SEED属于什么库里面的。：）
  
在看中国电力出版社的FORTRAN95那本书时，最后面附的FORTRAN库存函数里面有类似的函数。再深层次的我就不知道了。
  
见笑了。：P
  

kuangtq

CALL CLEARSCREEN (area)  
  
area  
(Input) INTEGER(4). Identifies the target area. Must be one of the following symbolic constants (defined in DFLIB.F90 in the \DF98\INCLUDE subdirectory):  
  
$GCLEARSCREEN - Clears the entire screen.  
$GVIEWPORT - Clears only the current viewport.  
$GWINDOW - Clears only the current text window (set with SETTEXTWINDOW).  
All pixels in the target area are set to the color specified with SETBKCOLORRGB. The default color is black.  
  
在VF6.5的帮助中没找到DATE_TIME_SEED 。