PDA

Visualizza la versione completa : Qualcuno Sa Rispondere???


BlackDemon
27-07-2002, 16:45
:dh: :confused: :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????????????????????:dh: :quote: :confused: :adhone:

zampa28
27-07-2002, 17:10
Private Sub Command1_Click()

Randomize

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

End Sub


Cos usi tutti i 255 caratteri Ascii disponibili

Drocchia
27-07-2002, 19:05
:metallica :ciapet: :metallica

Loading