Ben en fait, j'ai le code suivant qui génère un nombre aléatoire lorsqu'on clic sur un bouton, mais au lieu de mettre le résultat dans MsgBox comme je le fait ci-dessous, je souhaite le mettre dans un chams texte sans l'option Voulez vous, ...
Private Sub Command4_Click()
Do Until DefResp = vbNo
Randomize Timer
MyNum = Int(2000 * Rnd + 1) ' Génèrer un entier aléatoire entre 1 et 2000
DefResp = MsgBox(MyNum & " Voulez-vous un autre nombre?", vbYesNo)
Loop
...
Salut,
Il y a quelque chose qui ne va pas dans ton code.Tucalcules un valeur (Mynum)et tu la fais sortir comme String.
Je crois que tu devrais afficher Str$(Mynum)& etc...
Text1.text=str$(Mynum)
A=
Marc