Hvordan finne Maksimal Enum på VB
Ved hjelp av en rask løkke for å søke etter den største verdien i en Enum typen er nyttig når du ikke ønsker å hardkode en maksimal verdi i Visual Basic (VB) program. Enum er en måte å nummerere og definere et sett med navngitte verdier. Navnene blir behandlet likt konstanter og kan ikke endres senere. Du finner Enum maksimale verdi ved å bruke "[Enum] .GetValues" metoden og bruke en "for hver" loop for å søke gjennom enum verdier.
Bruksanvisning
1 Åpne din VB-filen i et redigeringsprogram, for eksempel Microsoft Visual Basic.
2 Erklærer en Enum og tilordne det verdier ved å legge til følgende kode utenfor funksjonen:
Offentlig Enum MyEnum
Bob = 5
Susan = 11
Ted = 2
Erik = 11
Lisa = 34
slutt Enum
3 Finn den maksimale verdien av Enum typen ved å legge til følgende kode i funksjon:
Dim max så lenge = 0
Dim n As Integer
Dim isInitial Som Boolsk = sant
For hver n I [Enum] .GetValues (getType (MyEnum))
Hvis isInitial = True Deretter
isInitial = False
max = CLng (n)
Ellers
Hvis CLng (n)> max Deretter
max = CLng (n)
Slutt om
Slutt om
neste
"For hver" løkke gjentas gjennom Enum type, sammenligner hver verdi til det største funnet så langt. Den "CLng" funksjonen konverterer et tall til "Long" type.
4 Vis maksimumsverdien med koden:
MessageBox.Show ( "Maksimal Enum value =" & max)
5 Lagre VB-filen, og kompilere og kjøre programmet for å se den maksimale Enum verdi.