文章背景： 在VBA代码中，有时需要创建 动态数组 ，然后对该动态数组进行操作。如果该数组为空，在使用一些函数（如 Lbound ， Ubound 等）时，代码会报错。因此，需要事先判断动态数组是否为空。下面介绍一个判断动态数组是否为空的自定义函数。

Function EmptyArr(ByRef x() As String) As Boolean
    '判断数组是否为空的自定义函数
    '若是空数组，结果为 True
    '若不是空数据，结果为False
    Dim tempStr As String