注册 登录
编程论坛 VB.NET论坛

急!请教VB.NET混合编程的问题!

gao_sl 发布于 2010-01-29 08:25, 898 次点击
使用Fortan PowerStation4.0编了一个程序,生成动态链接库文件“test.dll”以供程序调用,但程序在使用CALL命令调用“test.dll”中的函数时总是出错!请高手指点迷津,不胜感激。

出错问题如图所示

只有本站会员才能查看附件,请 登录

2 回复
#2
gao_sl2010-05-29 22:25
回复 楼主 gao_sl
难道这里就没人懂这个吗?大虾们你们在哪啊。
#3
gao_sl2010-05-29 22:33
用FPS4.0编写生成一个DLL文件“test.dll”(源代码如下)供编写的一个程序调用(源代码如下)。但运行总是出现<无法在DLL“XXXXX\test.dll”中找到名为‘XXX’的入口点>的错误。请高手帮忙啊!

FORTRAN程序:

SUBROUTINE calltest(X,Y,result)

! MS$ ATTRIBUTES ALIAS:"calltest"::calltest
! MS$ ATTRIBUTES DLLEXPORT::calltest

Integer*2 X
Real*4 Y,result

result=X*Y

END SUBROUTINE


程序:

Public Class CallFortran

    Declare Sub calltest Lib "test.dll" _
    (ByVal vbx As Integer, ByVal vby As Single, ByRef vbresult As Single)
-------------------------------------------------------------------

    Private Sub btnjisuan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnjisuan.Click


        Dim vbx As Single
        Dim vbresult As Single
        Dim vby As Integer


        vbx = 4
        vby = 5

        Call calltest(vbx, vby, vbresult)

        lbljieguo.Text = vbresult


    End Sub
End Class
1