Public Class frmSetUp ' student version Private Sub btnStart_Click(sender As Object, e As EventArgs) Handles btnStart.Click 'In Form2.vb you'll need some code that helps to set up the game. '- Name the Start button btnStart. '- Name the Quit button btnQuit. '- When the Start button is clicked, use what the users put into txtName1 and txtName2 'to give values to the variables 'player1' and 'player2'. If these TextBoxes are left blank, 'assign Player1 to 'player1' and Player2 to 'player2'. 'Call Randomize(), and then call Rnd() to assign a random number to 'playerFirst'. 'Use 'playerFirst' to determine which player will go first. Assign the name 'of the player who will go first to 'player'. 'Set the variable 'delay' equal to 3000 (3 seconds). 'Set the variable 'numBoxes' equal to 12. 'Set the variable 'numImages' equal to 'numBoxes' divided by 2. 'Set the variable 'stillYourTurnAfterAMatch' to either True or False. 'Assign the PictureBoxes in Form3 to the list 'Picture'. In VB, the numbering 'of a list or an array begins at 0. I started all numbering in this program with 1. 'So I added the first Image (called pb1 on Form3) twice to 'Picture'. 'The first pb1 goes into position 0 in 'Picture' (which won't be used) 'and the second pb1 goes into position 1. Here's my code: 'Picture.Add(Form3.pb1.Image) 'Picture.Add(Form3.pb1.Image) 'Picture.Add(Form3.pb2.Image) ' ... 'You should continue adding Images to 'Picture' until all 18 of the Images on Form3 'are added to the list 'Picture'. You don't have to add your 'door' Image to 'Picture'. 'To make this introductory form disappear, call Me.Hide(). 'To make Form1 (also named frmGame) - the game board - show up, call frmGame.Show(). 'When the Quit button is clicked, calling End will cause the program to quit. '- Setting the size of the game (12, 24 or 36 boxes) will be done as extra credit (see below). '- Setting how long the pictures stay exposed when a player doesn't get a match will be done 'as extra credit. '- Setting whether or not a player retains his turn when she gets a match will be done 'as extra credit. End Sub Private Sub cmbDelay_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbDelay.SelectedIndexChanged End Sub Private Sub btnQuit_Click(sender As Object, e As EventArgs) Handles btnQuit.Click End Sub End Class