タイトル : Re^3: VB .NET 2003でゲーム 投稿日 : 2008/02/22(Fri) 16:27 投稿者 : さぁら
わからなくなったのでまた質問します。 現在、 For y = 0 To 7 For x = 0 To 16 n = n + 1 btn(n) = New Button btn(n).Parent = Me btn(n).Tag = n btn(n).Text = "" btn(n).TextAlign = ContentAlignment.MiddleCenter btn(n).SetBounds(23 * x + 23, 31 * y + 31, 23, 31) Controls.Add(btn(n)) AddHandler btn(n).Click, AddressOf ButtonClick Next Next For y = 0 To 33 fname = "hai" & (1 + y).ToString() & ".gif" haif(y) = Image.FromFile(fname) btn(y).Image = haif(y) pict1(y) = y pict1(34 + y) = y pict1(68 + y) = y pict1(102 + y) = y Next と名前で判定をやっていますが、いくら頭を使っても消える判定ができません。 やはり配列に入れないとダメでしょうか? といっても配列に入れる方法もわからないのでお手上げ状態です。 とりあえず、隣接したボタンを押せば消えるという処理をしたいのですが、教えていただければと思い、投稿しました。 |