これが宿題であることを今すぐ明確にします。完全な回答は期待していませんが、歓迎します。
Visual Basic で 15 パズルを作成するように割り当てられました。これはゲームがどのように見えるかの例です (これは私がこれまでに持っているものです):
助けが必要なのは、画像の確認と移動です。右下に表示されている PictureBox 1 をクリックすると、その下、横、および上の画像がチェックされ、その場所の画像が My.Resources.NONE であるかどうかが確認されます。(NONEは私がインポートしたpng画像です)。隣接するセルが NONE の場合、2 つの画像は互いに交換されます。各 PictureBox にはアドレスに Handler があり、すべての画像は 2 次元の PictureBox 配列 (4x4) にあります。
このようにサブを設定しましたが、中に何を入れればよいかわかりません。助言がありますか?
Private Sub mypic_Click(ByVal sender As Object, ByVal e As EventArgs)
End Sub
アップデート:
私はさらにいくつかの調査を行い、いくつかのことを理解しました。これは私の現在のアプローチです:
Private Sub mypic_Click(ByVal sender As Object, ByVal e As EventArgs)
Dim x, y, w, z As Integer
ClickedPicture = DirectCast(sender, PictureBox)
x = ClickedPicture.Left
y = ClickedPicture.Top
If ClickedPicture(x + 1, y).Image = Nothing Then
ClickedPicture(x + 1, y).Image = ClickedPicture(x, y).Image
ClickedPicture(x, y).Image = My.Resources.NONE
End If
End Sub
私が今抱えている問題は、デフォルトのプロパティがないため、ClickedPicture にインデックスを付けることができないと言っているということです。これは正確にはどういう意味ですか?