aide d'une boucle rapide pour rechercher la plus grande valeur dans un type Enum est utile lorsque vous ne voulez pas coder en dur une valeur maximale dans votre programme Visual Basic (VB) . ENUM est un moyen d'énumérer et définir un ensemble de valeurs nommées . Les noms sont traités similaire à constantes et ne peuvent être modifiés par la suite. Vous pouvez trouver la valeur maximale de l' Enum en utilisant la méthode " [ Enum ] . GetValues " et en utilisant un " For Each " boucle de rechercher à travers les valeurs ENUM. Instructions 
 1 
 Ouvrez votre fichier VB dans un éditeur tel que Microsoft Visual Basic 
 2 
 déclarer un Enum et lui attribuer des valeurs en ajoutant le code suivant à l'extérieur de votre fonction . : Photos 
 public Enum MyEnum 
 
 Bob = 5 
 
 Susan = 11 & 
 Ted = 2 
 
 Erik = 11 & 
 Lisa = 34 
 
 End Enum 
 3 
 Trouver la valeur maximale du type Enum en ajoutant le code suivant dans votre fonction : 
 
 Dim max As Long = 0 
 
 Dim n As Integer 
 
 isInitial As Boolean = true 
 
 Pour chaque n Dans [ Enum ] . GetValues ( GetType ( MyEnum ) ) 
 
 Si isInitial = True Then 
 
 isInitial = False 
 
 max = CLng (n) 
 
 Else 
 
 Si CLng (n) > max puis 
 
 max = CLng (n) 
 
 End If End If 
 
 
 
 Suivant 
 
 »pour chaque « boucle parcourt le type Enum , en comparant chaque valeur à la plus grande trouvée jusqu'ici . La fonction " CLng " convertit un nombre en type "Long" 
 4 
 Afficher la valeur maximale avec le code . 
 
 MessageBox.Show (" Valeur maximale Enum =" & max) 
 5 
 Enregistrez le fichier VB, et compiler et exécuter le programme pour visualiser la valeur maximale Enum.