CreateCustomShape函数怎么在C++调用，参数需要用SAFEARRAY

news2024/9/25 21:19:20

🏆本文收录于《CSDN问答解惑-专业版》专栏，主要记录项目实战过程中的Bug之前因后果及提供真实有效的解决方案，希望能够助你一臂之力，帮你早日登顶实现财富自由🚀；同时，欢迎大家关注&&收藏&&订阅！持续更新中，up！up！up！！

问题描述

vba参数转c++ SAFEARRAY。这个CreateCustomShape函数怎么在C++调用，参数需要用SAFEARRAY，下面是一段vba的，请帮我写一个SAFEARRAY提交参数的。CreateCustomShape(“Callout”, “1”, 0, 0.07874, Array(Ex, Ey), Array(128.25, 53.74), 0#, Nothing, 0, 0, False)

如上问题有来自我自身项目开发，有的收集网站，有的来自读者…如有侵权，立马删除。

解决方案

如下是上述问题的解决方案，仅供参考：

在C++中使用SAFEARRAY来传递数组参数，通常涉及到COM（组件对象模型）的使用，因为SAFEARRAY是COM中的一种数据结构，用于在COM对象之间传递数组。在VBA中，Array函数创建的数组可以自动转换为SAFEARRAY，但在C++中需要手动创建和操作。

以下是一个C++示例，演示如何创建SAFEARRAY并将其作为参数传递给一个假设的CreateCustomShape函数。请注意，这个示例假设你已经有了一个可以调用的CreateCustomShape函数的接口，并且这个函数的实现是COM兼容的。

#include <iostream>
#include <comdef.h> // for SAFEARRAY-related definitions

// 假设的CreateCustomShape函数声明
void CreateCustomShape(
    BSTR shapeType,
    BSTR id,
    float xPos,
    float yPos,
    SAFEARRAY* exArray,
    SAFEARRAY* eyArray,
    float rotation,
    VARIANT_BOOL lockAspectRatio,
    long flipHorizontal,
    long flipVertical);

int main() {
    // 创建SAFEARRAY
    SAFEARRAYBOUND bounds[1];
    bounds[0].lLbound = 0; // 0-based index
    bounds[0].cElements = 2; // 数组元素数量

    SAFEARRAY *exArray, *eyArray;
    exArray = SafeArrayCreate(VT_R8, 1, bounds); // VT_R8 is double
    eyArray = SafeArrayCreate(VT_R8, 1, bounds);

    // 填充SAFEARRAY数据
    double exData[2] = {128.25, 53.74};
    double eyData[2] = {Ex, Ey}; // 假设Ex和Ey是已知的double变量

    SafeArrayPutElement(exArray, &exData, exData);
    SafeArrayPutElement(eyArray, &eyData, eyData);

    // 调用CreateCustomShape函数
    CreateCustomShape(
        L"Callout", L"1", 0, 0.07874, 
        exArray, eyArray, 
        0.0, VARIANT_FALSE, 0, 0);

    // 释放SAFEARRAY
    SafeArrayDestroy(exArray);
    SafeArrayDestroy(eyArray);

    return 0;
}

请注意，这个示例代码中有几个假设：

CreateCustomShape函数的声明和实现是COM兼容的。
VT_R8是SAFEARRAY元素的类型，表示double类型。
SafeArrayPutElement函数用于将数据放入SAFEARRAY中。
Ex和Ey是你需要传递给CreateCustomShape函数的变量，它们应该是double类型。

在实际使用中，你需要根据你的具体需求和环境来调整这个示例代码。如果CreateCustomShape函数不是COM兼容的，或者你使用的是不同的编程环境，那么实现细节可能会有所不同。

希望如上措施及解决方案能够帮到有需要的你。

PS：如若遇到采纳如下方案还是未解决的同学，希望不要抱怨&&急躁，毕竟影响因素众多，我写出来也是希望能够尽最大努力帮助到同类似问题的小伙伴，即把你未解决或者产生新Bug黏贴在评论区，我们大家一起来努力，一起帮你看看，可以不咯。

若有对当前Bug有与如下提供的方法不一致，有个不情之请，希望你能把你的新思路或新方法分享到评论区，一起学习，目的就是帮助更多所需要的同学，正所谓「赠人玫瑰，手留余香」。

☀️写在最后

ok，以上就是我这期的Bug修复内容啦，如果还想查找更多解决方案，你可以看看我专门收集Bug及提供解决方案的专栏《CSDN问答解惑-专业版》，都是实战中碰到的Bug，希望对你有所帮助。到此，咱们下期拜拜。

码字不易，如果这篇文章对你有所帮助，帮忙给 bug菌来个一键三连(关注、点赞、收藏) ，您的支持就是我坚持写作分享知识点传播技术的最大动力。

同时也推荐大家关注我的硬核公众号:「猿圈奇妙屋」 ；以第一手学习bug菌的首发干货，不仅能学习更多技术硬货，还可白嫖最新BAT大厂面试真题、4000G Pdf技术书籍、万份简历/PPT模板、技术文章Markdown文档等海量资料，你想要的我都有！

📣关于我

我是bug菌，CSDN | 掘金 | InfoQ | 51CTO | 华为云 | 阿里云 | 腾讯云等社区博客专家，C站博客之星Top30，华为云2023年度十佳博主，掘金多年度人气作者Top40，掘金等各大社区平台签约作者，51CTO年度博主Top12，掘金/InfoQ/51CTO等社区优质创作者；全网粉丝合计 30w+；硬核微信公众号「猿圈奇妙屋」，欢迎你的加入！免费白嫖最新BAT互联网公司面试真题、4000G PDF电子书籍、简历模板等海量资料，你想要的我都有，关键是你不来拿哇。