创建用于 Implements 语句的各种接口

在创建用于 Implements 语句的各种接口时，可以使用 Visual Basic 或能够创建类型库的其他工具，如 MkTypLib 实用工具或者 Microsoft Interface Definition Language (MIDL) 编译器。

Visual Basic 创建的大部分类所定义的接口都能够适用于 Implements。如果使用 Visual Basic 中定义类的方式来创建接口，那么只需要避免在属性和方法的名字中使用下划线就没有问题了。

在使用 Visual Basic 之外的工具创建接口时，必须遵循某些规定才能使之适用于 Implements。下面列出了大部分的限制条件。

• Interface 方法的名字中不能够有下划线。
  
  
• 只允许使用 [in] 和 [in,out] 参数。只有 [out] 参数和 [lcid] 参数都是不允许。
  
  
• 方法返回的类型必须是 HRESULT，以便使发生的错误能够被传递出去。在 Visual Basic 中是看不到 HRESULT 的，因为它被转换成一个异常事件（发生错误）。要创建一个具有返回类型的方法以用于 Visual Basic 中，必须在最终参数（final parameter）上使用 [out, retval]。
  
  
• 只可以使用 Automation 数据类型：

• 允许 SAFEARRAY 参数中包含上面列表中的任何一种简单数据类型。
  
  
• 允许使用枚举参数。
  
  
• 允许使用 Dispinterface 接口指针作为参数。
  
  
• 允许使用 Dual 接口指针作为参数。
  
  
• 允许使用 CoClass 参数。
  
  
• 警告   如果你正在创建一个类型库，以便使系统接口可以与 Implements 一起使用，那么必须避免使用 [oleautomation] 或 [dual] 属性。在将类型库添加到 Visual Basic “引用...”对话框中之前，必须先注册类型库，而且使用 [oleautomation] 属性注册的类型库将覆盖掉使系统接口远程化所需要的信息。这将导致系统中的其他应用程序发生错误。必须避免使用 [dual] 属性，因为它隐含着 [oleautomation]。

  注意 在创建类型库的时候指定 [oleautomation] 是有益的，这样将可以保证类型是正确的，但是，在通过 Visual Basic “引用...”对话框引用它之前，必须在没有属性的条件下构造它。

• 数据类型表中没有 Unsigned long 和 unsigned short 参数，使用它们是不允许的。
  
  
• 不允许使用用户定义的数据类型（结构）作为参数。
  
  
• Interfaces 必须基于 IUnknown 或 Idispatch。完整的 vtable （在 IUnknown/Idispatch 之后）必须在单个接口中描述。
  
  
• 有限制条件的 vtable 项将被忽略，它们对 Implements 语句没有什么不利影响。
  
  
• 大部分的指针都不能作为 [in] 参数传递。（例如，作为某种远程优化的结果，C++ 接口可能将参数声明为 [in] VARIANT* pVar。这将不适用于 Implements。）[in] 参数可以是 BSTR，指向一个接口的指针（例如 IDispatch*），或者 SAFEARRAY 指针（SAFEARRAYs 总是作为指针传递）。[in,out] 参数可以是一个 Automation 类型的指针，或者指向接口的双重指针（例如 IDispatch**）。（需要注意的是，'ByVal As String' 在 Visual Basic 中被映射为 [in] BSTR。在 Visual Basic 中不能使用 [in] BSTR*。）
  
  
• Implements 不能与 dispinterfaces 一起使用。

详细信息   请参阅《程序员指南》一书“对象编程”中的“多态性”，以及《部件工具指南》的《创建 ActiveX 部件》的“部件设计的一般规则”中的“通过实现接口提供多态性”。