(VB)ピクチャボックスに表示したアイコンをランダムに移動する

ピクチャボックスに適当なアイコンを表示し、ボタンを押すと画面上でランダムに移動する。
というものです。画像を表示するところまでは出来たのですが、画面上でランダムに移動させる事が解りません。
解る方いらっしゃいましたら教えてください。お願いします。

No.2 回答者： onlyrom 回答日時： 2008/05/28 16:22

ＶＢのバージョンが不明なのでなんですが、

Rnd関数で乱数を発生させ、それでピクチャーボックスのTop,Leftプロパティをセットすればどうでしょう。

●ユーザーフォームの表示範囲内をランダムに移動。

'--------------------------------------------
Private Sub Command1_Click()
　Picture1.Top = Rnd() * (Form1.Height - Picture1.Height)
　Picture1.Left = Rnd() * (Form1.Width - Picture1.Width)
End Sub
'----------------------------------------------------

但し、このままではボタンに重なることがあるので、そこは自分で回避のこと。
以上。

No.1 回答者： 16August 回答日時： 2008/05/27 20:34

同じ方でなければ、読んでみてください。

参考URL：http://oshiete1.goo.ne.jp/qa4053843.html