bekomme Verschiedene Ergenisse beim Auswerten der Array mit UBond

Hallo an alle,
hab da ein kleines Verständnisproblem mit Array und UBound


folgender Syntax wurde verwendet:

DIM numSlaves

Dim A(6,8,10)

numSlaves = 0 + UBound(A)

Print ("A = " & numSlaves)

'Ergebnis A = 6

DIM B

B = Array(6,8,10)

numSlaves = 0 + UBound(B)

Print ("B = " & numSlaves)

'Ergebnis B = 2

Bei A habe ich ein dreidimensionales Array angelegt wenn ich dieses Auswerte wie oben beschrieben, dann bekomme ich als Ergebnis eine 6. Wieso bekomme ich B nur die Dimension es Arrays hier 2 ==> 3 Dimensionen. Es ist doch beides mal das gleiche, jedesmal wurde ein dreidimensionales Array angelegt nur auf unterschiedliche weise!

Dank euch

Gruß Alex