W
wjf
Unregistered / Unconfirmed
GUEST, unregistred user!
可以用powerstation或者visual fortran完成dll的编写.这是个小例子,希望对你有帮助.
subroutine ttt()
!dec$ attributes ::ttt
//定义扩展属性
real y
y=6.
open(11,file='test.dat',status='unknown')
write(11,*) y
close(11)
end subroutine
编译成dll,即可调用。
subroutine ttt()
!dec$ attributes ::ttt
//定义扩展属性
real y
y=6.
open(11,file='test.dat',status='unknown')
write(11,*) y
close(11)
end subroutine
编译成dll,即可调用。