【文件属性】:
文件名称:vb调用fortran
文件大小:13KB
文件格式:DOC
更新时间:2016-07-08 07:41:37
fortran
(1)在Fortran PowerStation 4.0下,编制可供VB调用的.dll文件,示例代码:
subroutine forcx(a,b,c)
!ms$if .not. defined(linkdirect)
!ms$attributes dllexport :: HWJSVB
!ms$endif
integer a,b,c
a=b+c
end
(2) 在VB下编写如下代码:
Private Declare Sub forcx B Lib "dll.dll" Alias "_ FORCX @12" (ByRef a As integer, ByRef b As integer, ByRef c As integer)
Sub callfor()
Dim a as integer, b as integer ,c as integer
B=1 : c=2
Call forcx(a,b,c)
End
网友评论
- 很好。解决了我的问题。