arrays - 在 VBA 中，如何将数组设置为空？

Question

现在，在你说之前 - 我已经阅读了数十个类似的主题，但找不到解决方案。我有一个动态 Variant 数组，它必须被完全清除，所以在 IsEmpty 检查期间它被视为 Empty。我试过删除，但 IsEmpty 仍然返回 False。我不能 ReDim 它，因为数组是动态的。尝试将整个数组设置为 Nothing，但这会在 IsEmpty 检查期间引发错误。

我做错了什么，我怎样才能完全消除该数组，以便 IsEmpty 返回 True？

Answer 1

您可以将关键字 Empty 分配给 Variant 变量。

Public Sub Hello()

    Dim vArray As Variant

    vArray = Array("a", "b", "c")

    Debug.Print IsEmpty(vArray) 'prints false

    vArray = Empty

    Debug.Print IsEmpty(vArray) 'prints true

End Sub