LBound Function
Returns the smallest available subscript for the indicated dimension of an array.
LBound(arrayname[, dimension])
Example for WSH
Option Explicit
Dim sFutureArray, MyArray, x, sText
sFutureArray ="Some day this example will look boring to me"
MyArray = Split (sFutureArray, " ", -1, 1)sText = "The array holds " & UBound (MyArray) - LBound(MyArray) + 1 & " values. The values are the following:" & VBlf
For x = LBound(MyArray) to UBound (MyArray)
sText = sText & "MyArray(" & x & ")" & VBTab & MyArray(x) & VBlf
Next
WScript.Echo sText