VBA可重用循环功能[关闭]答案

【问题标题】：VBA reusable loops function [closed]VBA可重用循环功能[关闭]
【发布时间】：2020-10-01 05:39:32
【问题描述】：

我在 powerpoint vba 中使用 for each 和 for 循环多次，以循环所有幻灯片和形状。例如，

对于 i = Activepresentation.slides(i).count 接下来我

对于 i = 1 到 ActiveWindow.Selection.ShapeRange.Count 接下来我

将 sld 调暗为幻灯片将 shp 变暗为形状对于 ActivePresentation.Slides 中的每个 sld 对于 sld.shapes 中的每个 shp 下一个下一个shp

有没有办法为这些循环创建一个可重用的函数？这样就可以在需要时调用它。

非常感谢。

感谢和问候，巴鲁。

【问题讨论】：

这是什么语言？将此添加到您的标签或问题中。
该代码不是有效的 C++，它必须是 class a* obj = new b; 才能编译
显示真实代码并创建minimal reproducible example。
@UnholySheep 如果没有缺少*，则可能是这样。但无论如何，这是一个格式不正确的问题。
或者两者之间没有继承关系，但是 a 有一个接受 b * 参数的 ctor。

标签： vba loops powerpoint

【解决方案1】：

如果我让你写 - 你尝试创建一个类 obj。与操作员新。但你的代码不太正确。它更像是： class a * obj = new a(); 这意味着您可以获得一些内存并使用您的 a 类中的一些参数构建一个 OBJ 类；在课堂上，您需要一些“构造函数”，例如： a(){this->param = xx;this->param = xxx};

【讨论】：

【解决方案2】：

如果您声明 class a* obj = new b，则类 b 必须是类 a 的派生类型。

class a {};
class b : public a {};

您正在为类的内容分配空间并使用operator new 调用构造函数。因为类 b 是类 a 的一种类型，所以可以从分配的类 b 中请求指向类 a 的指针，因为类 b 是类 a。

【讨论】：