求助一个困扰我多天的VB混编问题！多谢！！

目的：
    采用DLL动态链接库，实现VB和FORTRAN混合编程计算机系统：
    WIN xp_sp2编程软件：
    VB6.0_SP6(企业版)，Fortran PowerStation4.0程序算例：
1.Fortran程序（对一个数加100）SUBROUTINE testsub(d,y)
! MS$ attributes alias:'testsub'::testsub
! MS$ attributes dllexport::testsub
REAL(4) d,y
y = d+100
END SUBROUTINE testsub    通过编译连接后，生成testsub.dll，装入指定文件夹下。2. VB程序（调用FORTRAN程序）Private Declare Sub testsub Lib "D:\Program\testsub.dll" (d As Single, y As Single)
Private Sub Command1_Click()
    Dim d As Single
    Dim y As Single
    d = Val(Text1.Text)
    Call testsub(d, y)
    Text2.Text = y
End Sub
Private Sub Command2_Click()
    End
End Sub3. 运行VB程序
   经调试多次，程序中始终出现“实时错误‘453’找不到DLL入口点testsub in D:\Program\testsub.dll”。问题：
   错误出在什么地方，是fortran程序有误，还是vb调用时出错，请帮忙调试，并指出应该怎样避免以上错误，请指教,多谢。