VBA: 判斷動态數組是否為空

文章背景：在VBA代碼中，有時需要建立

動态數組

，然後對該動态數組進行操作。如果該數組為空，在使用一些函數（如

Lbound

，

Ubound

等）時，代碼會報錯。是以，需要事先判斷動态數組是否為空。下面介紹一個判斷動态數組是否為空的自定義函數。

Function EmptyArr(ByRef x() As String) As Boolean

    '判斷數組是否為空的自定義函數
    '若是空數組，結果為 True
    '若不是空資料，結果為False
    
    Dim tempStr As String
    
    tempStr = Join(x, ",")
    
    EmptyArr = LenB(tempStr) <= 0
    
End Function           

複制

示例：http://mpvideo.qpic.cn/0b78wuaacaaa5qacnyr2qrqvbnodag2qaaia.f10002.mp4?dis_k=2d78c6d67d9a3cc8167137356bf1f3ad&dis_t=1663655942&vid=wxv_2040257817898549249&format_id=10002&support_redirect=0&mmversion=false

參考資料：

[1] 關于Excel VBA判斷數組為空的問題（https://www.debugease.com/vb/764940.html）