Dans une énumération, la première valeur est initialisée à 0, la suivante est augmentée de 1 : dans notre exemple Dimanche vaut 0, Lundi vaut 1, Mardi vaut 2…
Enum jours
Dimanche
Lundi
Mardi
Mercredi
Jeudi
Vendredi
Samedi
End Enum
Sub Main()
Dim JoursSemaine as jours
JoursSemaine = Dimanche
Console.WriteLine(JoursSemaine.Tostring)
End Sub
Tostringça veux dire "en caractères alpha" ? :)
.toStringde
variable.toString
Module Module1
Enum jours
Dimanche
Lundi
Mardi
Mercredi
Jeudi
Vendredi
Samedi
End Enum
Public Sub Iterate()
Dim names = [Enum].GetNames(GetType(jours))
'affiche dimanche - mercredi
Console.WriteLine(names(0) & "-" & names(3))
Console.WriteLine()
'tous les jours
For Each item In names
Console.WriteLine(item)
Next
Console.ReadKey()
End Sub
Sub Main()
Iterate()
End Sub
End Module
Public Sub Iterate()
Dim names = [Enum].GetNames(GetType(jours))
' ça ressemble à une déclaration de variable
Console.WriteLine(names(0) & "-" & names(3))
' c'est comme pour afficher un tableau ?
For Each item In names
Console.WriteLine(item)
Next
'ya la boucle For mais le reste je connais pas
Sub Main()
Iterate() ' je connais pas cette fonction
End Sub
Modifié le 25 avril 2017 à 19:37