Sample Code:

Dim myArray, arraySize
myArray = Array("Test", "Test1")
arraySize = ubound(myArray) + 1

Note:

Ubound returns the last index in array – so size of array will be +1.