hola compañeros, espero puedan ayudarme, tengo un codigo para crear numeros aleatorios, que funciona perfectamente, pero quisiera que los numeros que vayan saliendo no se repitan , i como podria ir almacenando cada resultado , gracias este es el codigo:
Código (vbnet) [Seleccionar]
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Enabled = False
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim numero As Byte
Timer1.Enabled = True
Randomize()
numero = Rnd() * 6
Do While numero > 6
numero = numero - 6
Loop
Do While numero < 1
numero = numero + 6
Loop
Loop
TextBox1.Text = numero
End Sub
End Class