Cómo encontrar el máximo Enum en VB

El uso de un bucle rápido para buscar el valor más grande de un tipo Enum es útil cuando no se desea codificar un valor máximo en el programa de Visual Basic ( VB ) . Enum es una manera de enumerar y definir un conjunto de valores con nombre . Los nombres son tratadas de forma similar a las constantes y no pueden ser cambiados más tarde . Puedes encontrar el valor máximo de la enumeración con el método " [ Enum ] . GetValues ​​" y con un " For Each " bucle para buscar a través de los valores de enumeración . Instrucciones
1

Abra el archivo de VB en un editor como Microsoft Visual Basic
2

declarar una enumeración y asignarle valores añadiendo el siguiente código fuera de la función. :

Public Enum MyEnum

Bob = 5

Susan = 11

Ted = 2

Erik = 11
< p > Lisa = 34

End Enum
3

Encuentre el valor máximo del tipo Enum añadiendo el siguiente código en su función :

Dim max As Long = 0

n As Integer

isInitial Dim As Boolean = True

For Each n En [ Enum ] . GetValues ​​( GetType ( MyEnum ))

Si isInitial = True Luego

isInitial = False

max = CLng (n )

demás

Si CLng (n ) > max Entonces

max = CLng (n )

End If End If

Siguiente

" For Each " bucle itera el tipo Enum , comparando cada valor a la más grande encontrado hasta ahora. La función " CLng " convierte un número en el tipo "Long"
4

Muestra el valor máximo con el código : .

MessageBox.Show ( " Valor máximo Enum =" & max)
5

Guarde el archivo VB, y compilar y ejecutar el programa para visualizar el valor máximo Enum .