| 分類:[VB.NET/VB2005 以降]
visual vasicでマインスイーパーを作成しているのですが
startボタンを押したら爆弾を発生させる (1)MinePosの配列を0で初期化する(0から9) Forの二重ループを使う。
(2)乱数の初期化 Randomize()
(3)爆弾の数を乱数で決め,Mineに入れる。 爆弾の数の範囲は10〜20とする。 Rnd()は0以上,1未満の範囲の値を返す。整数化はInt() (4)Mineの個数だけ爆弾を発生させ、爆弾を発生させた場所のMinePos(y,x)=-1にする。 爆弾を発生させる範囲は y:1〜8 x:1〜8 既に、爆弾がある場所に乱数発生させた場合は,再度乱数を発生させ、爆弾の位置が重ならないようにする。
このプログラムを教えてください |