Tic Tac Toe spel (4 / 5 steg)
Steg 4: Rutorna
36. infoga följande kod mellan privata Sub och End Sub för varje låda:
"OBS - Make säker formen siffrorna överensstämmer med varandra med rutan i."
Om PlayerTurnLabel.Text = "Röd Turn" då
LineShape1.Visible = sant
LineShape2.Visible = sant
ElseIf PlayerTurnLabel1.Text = "Blå tur" sedan
OvalShape1.Visible = sant
Slut om
"Om det är rött, kommer att göra ett kors visas när du klickar på en låda. Om det är blå, en cirkel. "
Om PlayerTurnLabel.Text = "Röd Turn" då
PlayerTurnLabel.Text = "Blå tur"
ElseIf PlayerTurnLabel.Text = "Blå tur"
PlayerTurnLabel.Text = "Röd Turn"
Slut om
"Detta kommer att göra svängar förändras över när du klickar på en låda. Om röd, blir blå och Vice Versa "
Om LineShape1.Visible = True Then
RectangleShape1.Enabled = False
ElseIf OvalShpe1.Visible = sant då
RectangleShape1.Enabled = False
Slut om
"Detta inaktiverar rutan efter det har klickats."
37. kopiera och klistra in ovanstående kod i kodningen för varje boxas, bara göra säker till CHANGE THE form nummer till MATCH!