Visual Basic 6 - Generatore numeri da 1 a 90 ?

Ciao ragazzi !

ho bisogno di un codice da immettere in un command, che ogni volta che lo premo mi viene fuori in una textbox un numero non in ordine ma casuale e che sopratutto non venga MAI ripetuto !

Qualcuno mi può fare un esempio facile ?
Grazie a tutti

uso VISUAL BASIC 6

Salve,
sbaglio o stai chiedendo piu' o meno la stessa cosa che avevi chiesto nell'altro post?
Mi sembrava di averti gia' detto che su questo forum non abbiamo l'abitudine di fornire codice On Demand;
su, provaci prima da solo, poi se non ci riesci vediamo di aiutarti ok?

Ciao.

Ehi !
ma cosa fai mi perseguiti ?

comunque si, hai ragione adesso ti posto il mio codice

Ho un timer1 con intervallo di 3000 e dentro ho inserito questo codice:

Private Sub Timer1_Timer()
Randomize
txtestreatto= Int(Rnd * 15)
if txtestratto.text = lbl1.caption then 
lbl1.visible = true
end if
if txtestratto.text = lbl2.caption then 
lbl2.visible = true
end if
if txtestratto.text = lbl3.caption then 
lbl3.visible = true
end if
if txtestratto.text = lbl4.caption then 
lbl4.visible = true
end if
'ecc...
End Sub

e i numeri escono in randomize ma come ho detto prima, purtroppo si ripetono !

poi, ho 90 label tutte numerate

Esempio:

la label che contiene il numero 1, si chiama lbl1 e così via... ovviamente ho messo nello stesso timer un controllo per rendere visibile le label in base al numero generato.

Ma ovviamente, l'unico problema è quello che i numeri estratti non devono ripetersi mai.

Ti basta ?

Grazie ancora !

Usa un array per memorizzare i numeri già usciti, se non sai cosa sia consulta questo buon manuale:

trj.altervista.org/…

Poi vedo che ogni label contiene un numero e in base al numero uscito mostri la label corrispondente... ma scusa non potresti usare un'unica label dove mostri il numero uscito? (Con: lbl1.caption = txtestratto.text)

Comunque ho visto che hai aperto due thread in parallelo, quindi chiudo questo.
Se hai problemi continui scrivendo nell'altro.

p.s. Leggiti il regolamento