vba - 在 VBA 中将类型设置为空？

Question

我用自己的类型定义了一个变量，比如说

Dim point As DataPoint

Public Type DataPoint
   list as Collection
   name as String
   number as Integer
End Type

我想删除变量 point 的所有值立刻。如果它是一个类，我会使用 Set point = New DataPoint ，或设置 Set point = Nothing ，但是如果它是一种类型，我该如何继续？

Answer 1

标准方法是将每个成员单独重置为其默认值。与对象相比，这是用户定义类型的限制之一。

冒着陈述显而易见的风险:

With point
    Set .list = Nothing
    .name = ""
    .number = 0
End With

或者，您可以创建一个“空白”变量，并在每次要“清除”它时将其分配给您的变量。

Dim point As DataPoint
Dim blank As DataPoint

With point
    Set .list = New Collection
    .list.Add "carrots"
    .name = "joe"
    .number = 12
End With

point = blank 
' point members are now reset to default values