求教各位大虾，我用VB调用Fortran DLL时，总出现错误：找不到DLL入口，如下。请问该如何解决。
     版本：VB6.0
           compaq visual fortran 6.6
程序如下：
  SUBROUTINES forstrarr(s)
  !MS$ATTRIBUTES ALIAS:"forstrarr"::forstrarr
  !MS$ATTRIBUTES DLLEXPORT::forstrarr
  !MS$ATTRIBUTES STDCALL::forstrarr
  !MS$ATTRIBUTES REFERENCE::s
  CHARACTER(40) s
  s="This is a string from fortran"
  END

Declare Sub forstrarr Lib "E:\fortran\fortvb\Debug\fortvb.dll" Alias "_forstrarr@4" (ByVal s As String)

   Private Sub Command1_Click()
   Dim s As String * 40
   Call forstrarr(s)
   Text1.Text = s
   End Sub

运行后出错：实时错误453，找不到DLL入口。
请各路高手指教！！！