Ved hjælp af en hurtig løkke for at søge efter den største værdi i et Enum type er nyttigt, når du ikke ønsker at hard- code en maksimal værdi i din Visual Basic ( VB) program. Enum er en måde at opregne og definerer et sæt af navngivne værdier. Navnene behandles ligner konstanter og kan ikke ændres senere. Du kan finde Enum maksimale værdi ved at bruge " [ Enum ] . GetValues ​​"-metoden og bruge en " For Each " loop til at søge gennem nummereringstypen værdier. Instruktioner
1

Åbn din VB filen i en editor såsom Microsoft Visual Basic
2

Erklær en Enum og tildele den værdi ved at tilføje følgende kode uden for din funktion. :

Public Enum MyEnum

Bob = 5

Susan = 11

Ted = 2

Erik = 11
< p > Lisa = 34

End Enum
3

Find den maksimale værdi af Enum typen ved at tilføje følgende kode i din funktion : Hej

Dim max As Long = 0

Dim n As Integer

Dim isInitial som Boolean = Sand

For Each n In [ Enum ]. GetValues ​​( getType ( MyEnum ) )

Hvis isInitial = Sand Derefter

isInitial = False

max = CLng (n )

Else
p Hvis CLng (n ) > max Så

max = CLng (n )

End If

End If

Næste

" For Each " loop gennemløber den Enum type sammenligne hver værdi til den største fundet hidtil. Den " CLng "-funktionen konverterer et tal i "Længe " type
4

Vise den maksimale værdi med koden : .

MessageBox.Show ( "Maximum Enum value =" & max)
5

Gem VB fil og kompilere og køre programmet for at se den maksimale Enum værdi.