1 de >
Pour I = 0 à 10 Faible RandomClass comme nouvel aléatoire () Faible r1 comme nombre entier r1 = RandomClass.Next (1, 90) System.Diagnostics.Debug.Print (r1) Le code " clair " de >
1 : 2 : 3 : 4 : 5 : 6 : 7 :
Obscurcir RandomClass comme nouvel aléatoire () Pour I = 0 à 10 Faible r1 comme nombre entier r1 = RandomClass.Next (1, 90) System.Diagnostics.Debug.Print (r1) Après