vba - 重载属性

Question

我试图在类模块中的 VBA 中重载:

Dim a As Integer

Public Property Let SomeNumber(newNumber as Integer)
   a = newNumber
End Property
Public Property Let SomeNumber(newNumber as String)
   a = Val(newNumber)
End Property
Public Property Get SomeNumber() As Integer
   SomeNumber = a
End Property

编译器提示“检测到不明确的名称”，显然存在不同的签名。是否可以重载在 VBA 或 VB6 中的类中定义的属性？如果是这样，语法是什么？

此外，如果属性重载是不可能的，那么属性比公共(public)函数定义的 get/set 方法有什么好处，而不是更无缝地访问实例化对象的字段？

Answer 1

您可以使用变体或对象类型并手动处理类型检查吗？

可选参数的混合也是可能的，但它也不完全等同于重载。