bonsoir ,
comment utiliser le RND dans un tirage au sort "genre euro million"
pour que le premier numéro soit exclut dans le deuxième tirage

voilà ce que je fais mais ça a pas l'ai de marcher
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 
 Private Sub btnNumero1_Click()
 Randomize
 Num1 = Int(49 * Rnd + 1)  ' un numéro entre 1 et 49 
 TxtNum1.Text = Num1     ' la case ou afficher le 1er numéro 
 TxtNum1.Enabled = False 
 End Sub
 
Private Sub btnNumero2_Click()
Num2 = Int((49 And Not Num1) * Rnd + 1) ' un  numéro entre 1 et 49 'diffèrent  du Num1
TxtNum2.Text = Num2
TxtNum2.Enabled = False
End Sub
si à qu'un à une idée c'est sympa