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.
|