Zufall

Hallo, ja sie gibt es.
Code:
Private Sub Command1_Click()
  Randomize -Timer
  MsgBox Int(6 * Rnd) + 1
End Sub
 
Zurück