■33196 / ) |
配列を使って、何回押されたか判定する VB.NET2003 |
□投稿者/ 超初心者 (16回)-(2009/02/23(Mon) 04:14:25)
|
分類:[VB6 以前]
(VB.NET2003)
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'ピクチャーボックス1〜2のイメージをクリア For Each picBox As PictureBox In New PictureBox() {PictureBox1, PictureBox2} picBox.Image = Nothing Next 'ピクチャーボックス3〜4にイメージを設定 PictureBox3.Image = Image.FromFile("C:\image03.jpg") PictureBox4.Image = Image.FromFile("C:\image04.jpg") End Sub
Private Sub PictureBox3to4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox3.Click, PictureBox4.Click For Each picBox As PictureBox In New PictureBox() {PictureBox1, PictureBox2} If picBox.Image Is Nothing Then picBox.Image = sender.Image Exit Sub End If Next End Sub
上記は、ピクチャーボックス3〜4のどれかが押されるとピクチャーボックス1に押された画像が挿入され、 次にピクチャーボックス3〜4のどれかが押されると次はピクチャーボックス2に押された画像が挿入されるプログラムです。
あるカードゲームの役判定をするため配列を使って、
例えば、ピクチャーボックス1にピクチャーボックス3が挿入されたら配列は↓に [3] = 1 [4] = 0 *[3]は、ピクチャーボックス3のこと。 1は挿入された回数
次に、ピクチャーボックス2にピクチャーボックス4が挿入されたら↓ [3] = 1 [4] = 1
それぞれ何回挿入されたか配列を使って判定するプログラムが作りたいのですが 初心者の自分には難しくて分かりません・・・。
どなたかご教授願います┏○
|
|