1 使用api函数safearraygetdim()的返回值是否小于等于0
Private Declare Function SafeArrayGetDim Lib "oleaut32.dll" (ByRef saArray() As Any) As Long '判断数组为空或没有初始化
返回值值<=0,说明数组元素个数为0或者数组还没有初始化. 2 使用cstr(Join(list[, delimiter]))函数的返回值是否不等于"" 将delimiter参数设置为"" 例如:if (cstr(join(arr,""))) = "" then msgbox "arr 数组为空或者尚未初始化"
|
|