|
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?注册
x
目的:
采用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 Sub
3. 运行VB程序
经调试多次,程序中始终出现“实时错误‘453’找不到DLL入口点testsub in D:\Program\testsub.dll”。
问题:
错误出在什么地方,是fortran程序有误,还是vb调用时出错,请帮忙调试,并指出应该怎样避免以上错误,请指教。
[color=#006400]文字[color=#0000FF]文字 |
|