Моя задача:
Создайте простую игру соответствия. Начните с заставки. Затем перейдите к набору картинок 2 X 2, который «перевернется» при нажатии на одну из них. Сделайте одну часть соответствующей работы, прежде чем переходить ко второй.
Я также обязан сделать это в веб-форме, если это имеет какое-либо значение ..
Мой текущий код:
Public Class SimpleMatching
Inherits System.Web.UI.Page
' Declare and sets variables.
Protected Sub TopLeftImage_Click(sender As Object, e As ImageClickEventArgs) Handles TopLeftImage.Click
' Flip over card
If TopLeftImage.ImageUrl = "~/BackCard.png" Then
TopLeftImage.ImageUrl = "~/star.png"
Else
TopLeftImage.ImageUrl = "~/BackCard.png"
End If
If BottomRightImage.ImageUrl = "~star.png" And TopLeftImage.ImageUrl IsNot "BackCard.png" Then
MatchMadeLabelStar.Text = "Congratulations, you made the star match"
End If
End Sub
Protected Sub BottomRightImage_Click(sender As Object, e As ImageClickEventArgs) Handles BottomRightImage.Click
' Flip over card
If BottomRightImage.ImageUrl = "~/BackCard.png" Then
BottomRightImage.ImageUrl = "~/star.png"
Else
BottomRightImage.ImageUrl = "~/BackCard.png"
End If
If TopLeftImage.ImageUrl = "~star.png" And BottomRightImage.ImageUrl IsNot "BackCard.png" Then
MatchMadeLabelStar.Text = "Congratulations, you made the star match"
End If
End Sub
Protected Sub BottomLeftImage_Click(sender As Object, e As ImageClickEventArgs) Handles BottomLeftImage.Click
' Flip over card
If BottomLeftImage.ImageUrl = "~/BackCard.png" Then
BottomLeftImage.ImageUrl = "~/sun.png"
Else
BottomLeftImage.ImageUrl = "~/BackCard.png"
End If
If TopRightImage.ImageUrl = "~sun.png" And BottomLeftImage.ImageUrl = "~sun.png" Then
MatchMadeLabelSun.Text = "Congratulations, you made the sun match"
End If
End Sub
Protected Sub TopRightImage_Click(sender As Object, e As ImageClickEventArgs) Handles TopRightImage.Click
' Flip over card
If TopRightImage.ImageUrl = "~/BackCard.png" Then
TopRightImage.ImageUrl = "~/sun.png"
Else
TopRightImage.ImageUrl = "~/BackCard.png"
End If
If TopRightImage.ImageUrl = "~sun.png" And BottomLeftImage.ImageUrl = "~sun.png" Then
MatchMadeLabelSun.Text = "Congratulations, you made the sun match"
End If
End Sub
End Class
У меня проблемы с тем, чтобы пометить их как совпадающие, и чтобы не пометить их как совпадающие, у меня переворот вперед и назад работает нормально, однако совпадающая часть не так уж и велика. Если вам нужна какая-либо другая информация, кроме этой, просто дайте мне знать, я обязательно постараюсь помочь решить эту проблему!