fijate que tu codigo no coincide con el que puse yo:
vos pusiste:
Código:
imagenes = App.Path & "\imagenes\cartas\" & Str(Int((Limite2 - Limite1 + 1) * Rnd + Limite1)) & ".jpg"
es asi:
Código:
imagenes = App.Path & "\imagenes\cartas\" & Int((Limite1 - Limite2 + 1) * Rnd + Limite1) & ".jpg"
y por lo que veo tus fotos se tienen que llamar desde
1.jpg hasta
52.jpg
saludos.