Antes de comenzar con el rnd (Random), pon "Randomize", sin comillas, con eso inicias la semilla del random y ya no se repite cada vez que lo ejecutas 
Es igual a esto:
http://foro.elhacker.net/scripting/vbscomo_usar_randomize-t247133.0.html
(es vbs pero la aplicación es la misma)
Saludos

Es igual a esto:
http://foro.elhacker.net/scripting/vbscomo_usar_randomize-t247133.0.html
(es vbs pero la aplicación es la misma)
Saludos