vb 调用 DELPHI编写的DLL 问题急急急急急急急急急急！

DELPHI方法名称：GetAuditCode
          参数：string sNsrdnbm
          参数：string sNsrdzdah
          参数：string sInvcCode
          参数：string sInvcNum
          参数：string sPrintAmnt
          参数：string sPrintDate
          参数：string sHyDm
   返回值：string fp_jym
以上内容是接口文档提供的。只能提供以上信息。

VB声明：
Public Declare Function GetAuditCode Lib "GetCertWord.dll" (ByVal sNsrdnbm As String, ByVal sNsrdzdah As String, ByVal sInvcCode As String, ByVal sInvcNum As String, ByVal sPrintAmnt As String, ByVal sPrintDate As String, ByVal sHyDm As String) As String

vb调用：

    Dim JYNO As String
    Dim Length As Long
    Dim a As String
    Dim b As String
    Dim C As String
    Dim d As String
    Dim e As String
    Dim f As String
    Dim g As String

    Length = 100

    a = Trim("3508020230543")
    b = Trim("100000000451950130")
    C = Trim("235001192040")
    d = Trim("00634672")
    e = Trim("8075.5")
    f = Trim("20120407")
    g = Trim("06")


    JYNO = GetAuditCode(a, b, C, d, e, f, g)

我用XP的环境下调用直接报：“内存不能读”
在win7的环境下vb工程直接关闭掉。

各位大哥，救命啊。 help!!!!!!!!

各位大哥，我只有那么多分了。

--------------------编程问答-------------------- Public Declare Function GetAuditCode Lib "GetCertWord.dll" (ByRef sNsrdnbm As String, ByRef sNsrdzdah As String, ByRef sInvcCode As String, ByRef sInvcNum As String, ByRef sPrintAmnt As String, ByRef sPrintDate As String, ByRef sHyDm As String) As String

--------------------编程问答-------------------- 我试过了。没有用的。

补充：VB ,  VBA

vb 调用 DELPHI编写的DLL 问题 急急急急急急急急急急！

vb 调用 DELPHI编写的DLL 问题急急急急急急急急急急！