Visual Basic - Ordenar números

lo que pasa es que quiero imprimir unas 100 veces los número del 1 al 24 en una hoja por vez.... es para hacer planillas para una rifa en el que se destapa el número y el que sacas es lo que pagas. si saco el 1 pago un peso o el 24 pago 24 pesos y asi con cada número. Por lo que se requiere mezclar la posición de los números para que no se sepa donde están en otra planilla. ejemplo:

1 5 6 7 8 9

2 10 13 16 19 20

3 11 14 17 21 22

4 12 15 18 23 24

esto sería una impresión, se moverían de lugar para la proxima impresión, se utilizarìa un label o un textbox por cada número me imagino, no se.... espero verme explicado... gracias

De vez en cuando es bueno practicar con algún ejercicio.

Para ejecutar el siguiente ejemplo, coloca el el Form un array de 24 Labels Label1(0) a Label1(23) los ordenas en el form en 6 columnas y 4 filas. También coloca un CommandButton Command1:

Private Sub Command1_Click()
Dim a() As Integer, i As Integer, x As Integer, j As Integer
ReDim a(23)
Randomize
For i = 0 To 23
repetir:
x = Int((24) * Rnd + 1)
For j = 0 To i
If x = a(j) Then GoTo repetir
Next j
a(i) = x
Next i
For i = 0 To UBound(a)
Label1(i).Caption = a(i)
Next i
Erase a
End Sub

Cada vez que pulses el botón generará un array de 24 números aleatorios (del 1 al 24) sin repetición.

Muchas Garcias, lo voy a checar...