VBScript 静态类变量/方法

Question

有没有办法在vbscript中为每个类提供一个变量？

如果不是，模仿它的最佳方式是什么？在类旁边声明的全局变量添加前缀？

还有没有办法声明静态/类方法（对于静态构造函数）还是我强制为函数添加前缀？

Answer 1

在支持类级/静态数据或方法的语言中，您可以

1. 将数据或方法显式关联/绑定到类定义的对象集。因此，您可以拥有 Customer.Count 和 Product.Count，客户代码中的普通 Count（或 @@Count）将访问正确的数字。
2. 在没有类实例的情况下使用此类数据或方法（尚）。

VBScript 不支持静态数据或方法。你必须使用全局数据或函数/子，并在脑海中进行关联（也许在命名约定的帮助下）。在没有对象的情况下访问这些"静态"=全局元素是微不足道的，但显然应该小心翼翼。

您可以在对象中嵌入一个或多个单一实例对象或代码引用 （GetRef（）），以将它们绑定到更接近类的位置，但这会增加实例的大小。

Answer 2

你可以做这样的事情来模拟静态类：

Class Defines_
   Public Sub DoSomethingUseful
   End Sub
End Class
Dim Defines : Set Defines = New Defines_
...
Defines.DoSomethingUseful

这可以用来给你一些类似于构造函数的东西（实际上是工厂方法）：

Class Something
   Private mValue
   Public Property Get Value : Value = mValue : End Property
   Public Property Let Value(x) : mValue = x : End Property
End Class
Class SomethingFactory_
   Public Function Create(value)
      Set Create = New Something
      Create.Value = value
   End Function
End Class
Dim SomethingFactory : Set SomethingFactory = New SomethingFactory_
...
Dim something : Set something = SomethingFactory.Create(5)