VB制作打地鼠游戏的问题。我做了一个打地鼠的游戏,运行时其他什么都行,就只有一个问题

2024-12-17 08:18:26
推荐回答(1个)
回答1:

For i = 0 To 8
Image1(i).Visible = False '兔子消失
'这里加一句
Image1(Index).Picture= 这里放正常的打中之前的图的地址。
'打中后你把打中的image的图改了,却忘记改回来。
'==============================
Next
Randomize
Image1(Int(Rnd() * 9)).Visible = True '随机函数控制兔子图片显示