Visual Basic - tengo problemas con un RND

Hola gente como andan. Miren yo tengo que hacer un Memotest, y tengo muchos problemas para hacer la carga de las imagenes, yo tengo 4 imagenes y tengo que hacer repetir cada imagen 2 veses, pero no encuentro la forma de hacerlo, hace 1 semana y media estoy con esto y me esta comiendo el cerebro.
Por favor el que lo sepa hacer si me puede pasar el codigo se lo agradeceria mucho.
contesten aca o si no manden un correo a:
[email protected]

Supongo que se puede hacer de muchas formas, la que utilice para un juego en el que tenia que mezclar 50 pares de imagenes fue la siguiente:

1. Cree dos tablas en la primera guarde la imagen y en la seguna un numero aleatorio ( RND)

2. Orden las tablas usando como criterio el orden de los numeros aleatorios

3. Imprimi la tabla.

Te pongo un trozo del programa.

' Crea numeros aleatorios

Randomize
For a% = 1 To 100
Orden(a%) = Rnd * 32000
Next

' Ordena la tabla

c% = 0
For a% = 1 To 99
For b% = 100 To a% + 1 Step -1
If Orden(a%) > Orden(b%) Then
Graf(c%).DownPicture = Graf(a%).DownPicture
Graf(a%).DownPicture = Graf(b%).DownPicture
Graf(b%).DownPicture = Graf(c%).DownPicture

Orden(c%) = Orden(a%): Icono(c%) = Icono(a%)
Orden(a%) = Orden(b%): Icono(a%) = Icono(b%)
Orden(b%) = Orden(c%): Icono(b%) = Icono(c%)
End If
Next
Next

Si te interesa te envio el fuente completo.