All pastes #498598 Raw Edit

Someone

public text v1 · immutable
·published 2007-05-20 15:36 UTC
rendered paste body
For j = 0 To 1
                vec2(j) = Int(8 * Rnd + 1)
                For x = 1 To j - 1
                    If vec1(x) = vec1(j) Then
                       vec1(j) = Int(8 * Rnd + 1)
                    End If
                estrelas_euromilhoes1.Text = estrelas_euromilhoes1.Text & vec2(j) & " "
                Next
            Next