Größe eines Array's

Wie kann man die Größe eines Array's ermitteln ? 
x = Array(100, 2, 3, 4, 5, 5, 5, 5)
MsgBox UBound(x) + 1