纯小白操作
vs2019+oneAPI2023
目录
创建动态链接库dll
- 在VS中选择创建新项目,选择Dynamic-link Library with Sample Code
- 生成后在Source Files中的.f90文件中进行代码的编写
- 代码编写完成后,在“生成”中选择“生成解决方案”生成.lib和.dll文件
!!!生成的.lib和.dll文件在项目中的Debug文件夹下
创建的动态链接库中的代码:
subroutine aa1(a)
!DEC$ ATTRIBUTES DLLEXPORT::aa1
integer*4 :: a
a=a+4
write(*,*)"a+4",a
end subroutine aa1
subroutine aa2
!DEC$ ATTRIBUTES DLLEXPORT::aa2
write(*,*)"hello!"
end subroutine aa2
调用动态链接库dll
- 将.lib和.dll文件和需要调用该动态链接库的项目放置在同一文件夹目录下
- 有两种方式调用。(1)将.lib文件直接添加到该项目的Source Files中,然后正常编译程序;(2)在程序中添加!DEC$OBJCOMMENT LIB:'name.lib',无需将.lib文件添加到该项目的Source Files中,然后正常编译
如果不进行第2步,只是将.lib和.dll与现有项目放在一个目录下然后执行会报错
第二种方法的代码示意:
program main
!DEC$OBJCOMMENT LIB:'testdll.lib'
implicit none
interface
subroutine aa1(a)
!DEC$ ATTRIBUTES DLLEXPORT::aa1
integer*4 :: a
end subroutine aa1
subroutine aa2
!DEC$ ATTRIBUTES DLLEXPORT::aa2
end subroutine aa2
end interface
integer*4 :: b
call aa2
b=4
call aa1(b)
end