Question

在vb中,如何在几张相同的图片中，随机在一处出现其他的图片

Answer 1

假如有5张相同的图片 c:\123.jpg 分别放在 picture1(0~4) 控件数组中,随机出现的图片为 c:\321.jpg：

dim k as integer '全局变量，老鼠出现的位置
private sub command1_click() '点击按钮随机出现老鼠图片
picture1(k).picture=loadpicture("c:\123.jpg") '恢复上一次老鼠位置的原始图片
k=int(rnd*5) '获取新的0到4的随机数
picture1(k).picture=loadpicture("c:\321.jpg") '新位置出现老鼠图片
end sub

Answer 2

您能把问题说清楚吗？

追问

就像打地鼠游戏，开始窗体上都是地洞的图片，怎么使地鼠出现的那张图片可以在其中随机出现