1

我最近从朋友那里得到的 c++ dll 有一些问题。我正在尝试将 dll 导入 Excel VBA 加载项。（我使用的是 Excel 2010 32bit 并且 dll 是在 Visual Studio 2008 中编译的）

首先，我尝试导入它，但它失败并出现运行时错误 49。我得出结论，它可能来自缺少的 c++ 声明 (__stdcal)。（我认为视觉工作室应该自动做到这一点，但没关系）

现在我在其声明中有一个带有 __stdcal 的新 dll，但是这些方法在其开头使用下划线 ( _ ) 声明。

因此，当我尝试声明 Sub 时，Excel 会告诉我“无效字符”之类的信息，是否有可能在不更改 c++ 文件的情况下避免这种情况？

'void _SaveFile(const char *FileName_);'
Declare Sub _SaveFile Lib "D:/DLL/TableController.dll" (ByRef FileName_ As String)
            ^
            |

提前致谢

这里有一些额外的信息可能会导致我的问题的解决方案。

我现在得到了一些 C++ 代码来调试我的问题......我仍然得到运行时错误 49，但是依赖 walker 现在给了我正确的方法名称（我认为这非常棒;））

我试图在 C# 程序中使用相同的 dll。正如我所料，它工作得非常正常。这是我的 C# 代码，这是导入：

        [DllImport("JLTable.dll",CallingConvention=CallingConvention.StdCall)]
        internal static extern void JLReadFile(string _FileName);

        [DllImport("JLTable.dll", CallingConvention = CallingConvention.StdCall)]
        internal static extern long JLGetRowCount();

如果我单击一个按钮，就会发生这种情况

        TableRunner.JLReadFile(@"D:\file.tab");
        long rows = TableRunner.JLGetRowCount();
        MessageBox.Show(rows.ToString());

这是我在 VBA 中的代码声明：

    Declare Function JLReadFile Lib "D:/JLTable.dll" (ByRef FileName_ As String)
    Declare Function JLGetRowCount Lib "D:/JLTable.dll" () As Long

和电话：

    Sub Read()
        Dim path As String
        path = "D:/file.tab"
        JLReadFile (path)
        Dim count As Long
        count = JLGetRowCount()
    End Sub

这也是我要调用的 c++ 代码。由于某种原因，我的朋友不希望我显示代码的确切作用，但它的行为仍然与此代码相同。

.h 文件（JLTable_API 类似于 #define JLTable_API __declspec(dllexport)）

    #define STDCALL
    extern "C"
    {
    JLTABLE_API void STDCALL  JLReadFile(const char *FileName_);
    JLTABLE_API void STDCALL  JLSaveFile(const char *FileName_);
    }

.c++ 文件

    void STDCALL  JLReadFile(const char *FileName_)
    {
    //log something to a file
    }
    long STDCALL  JLGetRowCount()
    {
    //log something to a file
    return 0;
    }

我非常感谢你能给我的每一个提示

和往常一样提前谢谢

4

2 回答 2

3

我终于有了解决办法。我发现了一个博客，它向我展示了我做错了什么。

http://aandreasen.wordpress.com/2008/05/05/how-to-create-a-dll-for-ms-excel-vba-with-microsoft-visual-c-2008-command-line-tools/

如上所述，您需要正确的方法名称，以确定哪个是正确的，我使用了依赖项步行器。这最终导致我发表了这个声明

VBA：

Declare Sub JLReadFile Lib "D:/JLTable.dll" (ByRef FileName_ As String) Alias "_JLReadFile@4" (ByRef FileName_ As String)

C++：

void __declspec (dllexport) _stdcall JLReadFile(const char *FileName_);
于 2012-10-19T09:21:17.270 回答
2

在我运行的类似测试中，您需要使用“别名”关键字。这样它就可以写成类似于：Declare Sub SaveFile Lib "D:/DLL/TableController.dll" Alias "_SaveFile" (ByRef FileName_ As String)

此外，我认为您不必通过引用传递文件名，但我可能是错的。自从我使用VB以来已经有一段时间了。有关从动态库导入函数的更多信息，请查看此页面

于 2012-10-15T09:51:08.037 回答