Excel 在从 xll 插件返回的较长 unicode 字符串上崩溃

Question

开发是在MS SDK之上使用C/C++进行的。

XLL 的 C++ 部分如下：

__declspec(dllexport) LPWSTR WINAPI xlGetLang(LPSTR in_key) {

    try {

    static XLOPER12 lang;
    static size_t buffer_size = 0;
    static wchar_t * buffer = NULL;

    std::wstring unicode_str;

    // This step get the unicode string assigned to unicode_str
    // with the key in_key from internal dictionary.
    pms::get_instance()->get_lang(in_key, unicode_str);
    // over

    size_t msg_len = unicode_str.length();

    // This step checks whether we need to incraese the buffer
    // for the unicode string to be returned.
    if (buffer_size == 0) {
        buffer = (LPWSTR) malloc(sizeof(wchar_t) * (msg_len + 1));
        buffer_size = msg_len;
    } else if (buffer_size < msg_len) {
        buffer = (LPWSTR) realloc(buffer, sizeof(wchar_t) * (msg_len + 1));
        buffer_size = msg_len;
    }
    // over

    wcsncpy(buffer, unicode_str.c_str(), msg_len);
    buffer[msg_len] = 0;

    return buffer;

    }

    catch (...) {
        ;
    }

}

Excel VBA 在 Application.Run 行中崩溃：

Dim var As String
var = Application.Run("xGetLang", key)

XLL 和 XLL 的组合当 XLL 返回短 unicode 字符串（即长度为 6 的 wchar_t）时，VBA 运行正常，但当返回较长的 unicode 字符串（即长度为 8 的 wchar_t）时，VBA 将开始崩溃（其中一种情况是“OFFICE :”）。

崩溃环境是Vista上的Excel 2007或Excel 2010。然而，XLL 和 XLL 的这种组合VBA 在 XP 上的另一台机器上的 Excel 2007 上运行完全没有问题。

我尝试在 XLL 插件函数中放置一个 try catch 块。没有发现异常。我还尝试在 VBA 代码中添加 ON ERROR 语句，但它也没有捕获任何内容。看起来崩溃发生在 XLL return 语句和 Excel VBA Application.Run 语句之间。我尝试在崩溃时检查正在运行的堆栈。如下：

1. NTDLL.DLL（崩溃点，由于写入内存 0X000000000 ）
2. Kernal32.dll
3. XLL addin DLL
4. Excel.exe

有人有任何线索吗？

Answer 1

如果您想摆脱 VBA，请使用 http://nxll.codeplex.com。 xll/utility/strings.h 中有用于将宽字符串转换为 MBCS 字符串的包装器。