New

创建类的新实例。

New关键字用于两种上下文：

语法：

varname, objectvar: 接收新对象引用的变量或属性名称。
type: 类名或其他可创建的对象类型。New不能用于创建任何内部数据类型（如Long或String）的新实例，也不能用于创建依赖对象。

在声明中使用New时，不会在声明处创建实例。而是在声明后首次引用变量时自动创建实例。每次将变量设置为Nothing后再次引用，都会创建新实例。

在Set中使用New时，会立即创建实例，并将引用赋给objectvar。如果objectvar先前持有对另一个对象的引用，则在赋新引用时释放旧引用。

INFO

New不能与WithEvents在声明中一起使用。要连接可感知事件的对象引用，请先用WithEvents声明变量，然后再用Set赋值。

通过声明中的New隐式创建。Worksheet的实例在首次使用时创建，而非在Dim行创建。

Dim X As New Worksheet
' No instance exists yet.
X.Activate ' First reference - instance is created here.

通过Set ... = New显式创建。实例在Set行创建。这是更常用的形式，因为构造的时刻在调用处可见。

Dim Forms(1 To 4) As Form1
Dim i As Long
For i = 1 To 4
    Set Forms(i) = New Form1
Next i

New ​