首页 文章

编写然后从Excel VBA调用C DLL

提问于
浏览
0

我正在使用Visual Studio 2010在C中编写一个32位DLL,我打算从Excel VBA调用它 .

C cpp文件包含:

#include "windows.h"
    #include "stdafx.h"

    int _stdcall fnGetData (const LPCSTR someText) {
        MessageBoxA(0, someText, "wizzle wuzzle", MB_OK | MB_ICONINFORMATION);
        return 42;
    }

虽然DEF文件有这个:

LIBRARY getpdata
    EXPORTS
    GetData=fnGetData

excel VBA是这样的:

Option Explicit
    Private Declare Function GetData Lib "getpdata.dll" (ByRef someText As String) As Integer
    Public Sub PassSomeText()
    Dim ret As Integer, someText As String
    someText = "Hello from my Excel Subroutine."
    ret = GetData(someText)
    End Sub

代码编译良好,并生成DLL . 但是当我从Excel VBA调用DLL中的函数时,消息框中的文本是乱码:
Result of MessageBoxA cpp call: d³ô³ or other garbled nonsense

我可能看到指针的文本表示?如何获取Excel VBA传入的文本值?

1 回答

  • 0

    就像我即将发布我的问题一样想出来 . 答案是在VBA函数声明中将ByRef更改为ByVal:

    Private Declare Function GetData Lib "getpdata.dll" (ByVal someText As String) As Integer
    

相关问题