uma questão fácil... mas q num to conseguindo resolver
é um loop que gera 4 numero diferentes(0, 1, 2, 3) em uma listbox em ordem randomica
eu quero que esse processo se repita por 10 vezes
Public Class Form2Dim numero(3) As Integer
Dim randomico As New Random
Dim num As Integer
Dim contador As Integer = 0
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Do Until (numero(0)) <> (numero(1)) And (numero(0)) <> (numero(2)) And _
(numero(0)) <> (numero(3)) And (numero(1)) <> (numero(2)) And _
(numero(1)) <> (numero(3)) And (numero(2)) <> (numero(3))
For i = 0 To 3 Step 1
num = randomico.Next(4)
numero(i) = num
ListBox1.Items.Clear()
ListBox1.Items.Add(numero(0))
ListBox1.Items.Add(numero(1))
ListBox1.Items.Add(numero(2))
ListBox1.Items.Add(numero(3))
Next
Loop
End Sub
Private Sub ListBox1_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
End Sub
End Class