random pictures...

well, how do i generate the same random picture twice?
i.e; i am currently working on a 'memory game'.

i stored my pics in a folder and each pics are named in numerics. e.g pic1, pic2, pic3, pic4.

and i wanted to generate 2 pics of the same e.g pic1 & pic1, pic5 & pic5.

maybe you mean something like this:

Code:

---

set picture1.picture = Loadpicture (folder & "\pic" & Int(1+rnd*4)) & ".bmp")
set picture2.picture = picture1.picture

---