Qualcuno Sa Rispondere???

[BlackDemon]

:master:
Salve a tutti per usare l'evento Randomize con i numeri basta usare questo semplice codice...

Private Sub Command1_Click()
Randomize
For I = 1 To 10
Text1.Text = Int(Rnd * 6) + 1
Next I
End Sub

...e se volessi farlo con le lettere???????????????????? :quote: :adhone:

[zampa28]

Private Sub Command1_Click()

Randomize

Text1.Text = Chr(Int(Rnd * 255) + 1)

End Sub

Così usi tutti i 255 caratteri Ascii disponibili

[Drocchia]

:metallica :metallica