Nel buon vecchio VB6 esisteva l'istruzione in oggetto che inizializzava il generatore di numero casuali.
Qui viceversa l'istruzione rnd() ripete la stessa medesima sequenza di numeri, per quanto ne ho capito io.
Ad esempio il pulsante PulsanteCambia ogni volta che è premuto *non* cambia il numero di 5 cifre generato.
Come ovviare ?
Qui viceversa l'istruzione rnd() ripete la stessa medesima sequenza di numeri, per quanto ne ho capito io.
Ad esempio il pulsante PulsanteCambia ogni volta che è premuto *non* cambia il numero di 5 cifre generato.
Come ovviare ?
B4X:
Sub PulsanteCambia_click
Dim RndNum As Int
Dim i As Int
Dim S As String
For i=1 To 5
RndNum=Rnd(0,9)
S=RndNum
Codice=Codice & S
Next
Codice=Codice.SubString2(0,5)
Log(Codice)
End Sub