如何获取数组长度??

[yrlxm]

FieldMustFill = "a2,a3,a4,a5 "


strSplit = Split(FieldMustFill, ",")

如何取得 strSplit 长度

[danielrh]

使用Ubound函数：Ubound（strSplit）

[DeltaCat]

如果数组下标是从 0 开始， 那么 UBound(array) + 1

如果不知道下标从几开始，那么 UBound(array) - LBound(array) + 1

[liuyann]

UBound Function


Returns a Long containing the largest available subscript for the indicated dimension of an array.

Syntax

UBound(arrayname[, dimension])

The UBound function syntax has these parts:

Part Description
arrayname Required. Name of the array variable; follows standard variable naming conventions.
dimension Optional; Variant (Long). Whole number indicating which dimension's upper bound is returned. Use 1 for the first dimension, 2 for the second, and so on. If dimension is omitted, 1 is assumed.


Remarks

The UBound function is used with the LBound function to determine the size of an array. Use the LBound function to find the lower limit of an array dimension.

UBound returns the following values for an array with these dimensions:

Dim A(1 To 100, 0 To 3, -3 To 4)

Statement Return Value
UBound(A, 1) 100
UBound(A, 2) 3
UBound(A, 3) 4