很简单的问题，如何得到数组的长度。

Question

代码如下：
Dim szData As String
Dim szItem() As String
szData = "ListDate Item 1&ListDate Item 2&ListDate Item 3&ListDate Item 4&ListDate Item 4&ListDate Item 5"
ReDim szItem(20)
szItem = Split(szData, "&")For i = 0 To 20
    ListDate1.AddItem szItem(i)
Next i提示在倒数第二行数组越界，请问如何得到数组的长度？

Answer 1

For i = 0 To Ubound(szItem )'用Ubound
    ListDate1.AddItem szItem(i)
Next i

Answer 2

ubound函数,55555~~~~~~~~该死的CSDN,本来偶在午夜的前面的

Answer 3

使用split函数必须注意赋值的数组应该是无界的，你却先定义了界限。我好像也遇到过此类问题，你应该多试试，查阅split函数的具体用法.