どこにどの画像が入ったか判定してくれるプログラム(VB.NET2003)
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の画像が挿入されているのなら「1-3」、4なら「1-4」です。と出力する）
難しすぎて全く分かりません・・・。 どなたかご教授願いします┏○
お礼
ありがとうございました。アドバイスいただいた通りにやりましたら できました。