如何判断一个数组变量是否存在??

Question

Dim b() As String从文本中按行读取数据,通过split赋值给b()
有的行只有一个数据,所以存在b(0),不存在b(1)
如何判断b(1)这个变量是否存在呢?

Answer 1

提供2个方法：
1
ubound(b)得到数组b的下标上限，如果是0则表示b(1) 不存在
2
用on error resume next，直接使用b(1)的值，如果b(1)不存在这句话就会被忽略

Answer 2

如果 B 没有初始化，LBound(b), UBound(b), 会出错的。肯定要On Error 进行处理了。
  
--------------------------------------------------------------
程序，犹如人生。