Sobre Enumeraciones

"Carlos

Proba con

System.Enum.GetNames(GetType(EnDepartamentos)).Length

Saludos.

Mmmm...creo que te complicas la vida:

Prueba con el siguiente código:

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

Dim Departamentos As EnDepartamentos
Dim valor As Integer

valor = Departamentos.Blancos

'valor será igual a 1

Acerca de las enumeraciones:

-Sólo necesitas darle valor al primer elemento (en este caso Deportes igual
a Cero), los siguientes los asume por defecto. De esta forma también es
válido lo siguiente:

Enum EnDepartamentos
Deportes=0
Blancos
Electronica
Carnes
' etc
End Enum

-Al agregar un item a la enumeración, automaticamente tu variable del tipo
de la enumeración "crece".

Espero haya respondido tu inquietud.

"Carlos Durán Urenda" escribió en el mensaje
news:

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

Excelente
es lo que necesitaba


Gracias


"Pablo Fébolo" escribió en el mensaje
news:

"Carlos

Proba con

System.Enum.GetNames(GetType(EnDepartamentos)).Length

Saludos.