Random sin repetir 60 números en VB 2008 Express

Question

Como puedo seleccionar 37 números de 60 con random sin que se repita ninguno.
Gracias

Answer 1

man yo tbn estoy buascando como hacer eso me podrias ayudar si ya lo hicistes te agradeceria mucho

Answer 2

Como puedo seleccionar 37 números de 60 con random sin que se repita ninguno.
Gracias

Es lo único que se me ha ocurrido.
Platicame para que lo quieres.
Gracias.

N=1
Inic3:
    Randomize
    Num(N) = Int(60 * Rnd()) + 1
    For T = 1 To 60
    If Num(N) = Numero(T) Then GoTo Inic3:
    Next T
    Numero(N).Caption = Num(N)
    N = N + 1
    If N = 61 Then GoTo Sig3:
    GoTo Inic3:
Sig3:

Answer 3

He tratado de comunicarme contigo la mejor forma que se me ocurrió es esta:

Dim Num(60) as Integer
N=1
Inic3:
    Randomize
    Num(N) = Int(60 * Rnd()) + 1
    For T = 1 To 60
    If Num(N) = Numero(T) Then GoTo Inic3:
    Next T
    Numero(N).Caption = Num(N)
    N = N + 1
    If N = 61 Then GoTo Sig3:
    GoTo Inic3:


Iganacio Vargas