IAccessible 类型未定义 Visual Basic

Question

我有一个 VB6 的旧项目

我想使用 MSAA Accessebility，但在这一行收到错误：

Private Declare Function AccessibleChildren Lib "oleacc" (ByVal paccContainer As IAccessible, ByVal iChildStart As Long, ByVal cChildren As Long, rgvarChildren As Variant, pcObtained As Long) As Long

错误：type not defined

我认为 IAccessible 类型未定义，如何正确定义它并在 VB6 中使用？

Answer 1

根据Brainbell.com 上的这篇文章，您必须添加对 oleacc.dll 的引用才能使用 IAccessible 类型：

在开始构建项目之前，您当然需要加载 Microsoft Active Accessibility SDK (MSAASDK)。加载 SDK 后，必须在项目中创建对 Accessibility DLL OLEACC.DLL 的引用。

从“项目”菜单中选择“引用”，然后单击“浏览”按钮查找 OLEACC.DLL 文件。默认情况下，此文件位于 \Windows\System 文件夹中。

创建引用后，您可以通过 Visual Basic 中的对象浏览器查看辅助功能库。

当您从对象浏览器的“项目/库”下拉列表中选择“辅助功能”时，您将不会在“类”或“成员属于”列表中看到任何内容，因为“辅助功能”设置已隐藏。您需要右键单击“成员”窗格并选择“显示隐藏成员”才能查看辅助功能类和成员。