Sobre Enumeraciones

Hola al grupo

tengo una enumeración que utilizo como indice para accesar a los elementos
de una matriz


Digamos... (solo un ejemplo)

Enum EnDepartamentos
Deportes=0
Blancos=1
Electronica=2
Carnes=3
etc
end Enum


Dim Departamentos ( 10 ) as integer
...

Valor=Departamentos(Blancos)


Mi duda es, existe una manera de conocer cuantos elementos tiene la
enumeración, de forma que pueda declarar la matriz segun el numero exacto de
elementos de la enumeración y si agrego nuevos elementos a dicha
enumeracion, la matriz adquiera el nuevo tamaño de la enumeración algo
como lo siguente?

Dim Deptos (EnDepartamentos.Lenght) as integer


Es posible?


Gracias

Carlos Durán