怎么获得自定义类型数组的元素个数 急啊 有大虾在吗？？

Question

Type aa 
   n1 as ..
   n2 as ..
end typeDim array(1 to 100) as aa如果知道数组array中存在n个记录,如何准确的求出n(可能n=0、0<n<100、n=100)？
不要告诉我是用UBound-LBound的方法啊 没用！写个函数，用个计数器来统计，我又不知道VB这里数组是以什么为结束。希望有高手有确切可行的解决方法赐教。谢谢！！

Answer 1

只有用循环判断了。dim i 
on error goto Err1
for i=0 to 100
    if array(i).n1="" then
    end if
next i
msgbox i
exit subErr1:
   msgbox i

Answer 2

强烈建议使用动态数组。这样就可以使用UBound-LBound了方法了。另外，也可以建一变量，每向数组元素添加时，就加1。
sujiang(心愿) 的方法有一问题，就是你必须保证数组元素中的每一记录的n1都需要设置才行，否则在一些特殊情况下，统计的数据可能不准确。