Advertisement
Guest User

HelpForm

a guest
Jun 24th, 2018
78
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 3.40 KB | None | 0 0
  1. Public Class Help
  2.  
  3.     Private Sub btnStep1_Click(sender As Object, e As EventArgs) Handles btnStep1.Click 'When Button "Step1" is clicked then do...
  4.         picBoxStep.ImageLocation = "pic1.png" 'Sets the PictureBox to a image which contains the visual for step 1
  5.         PicBoxStepText.ImageLocation = "picword1.jpg" 'Sets another PictureBox to an image which contains the words for step 1
  6.         PicBoxStepText.Visible = True 'When ButtonStep 1 is clicked, show the Text of what step one is.
  7.         picBoxStep.Visible = True 'When buttonStep 1 is clicked, show the image of what step one is
  8.         lblWelcome.Visible = False 'Hide the opening text to make way for the images.
  9.         lblOverview1.Visible = False 'Hide the opening text to make way for the images.
  10.         lblOverview2.Visible = False 'Hide the opening text to make way for the images.
  11.         btnStep2.Enabled = True 'Allow the user to go to the next step
  12.     End Sub
  13.  
  14.  
  15.     Private Sub btnStep2_Click(sender As Object, e As EventArgs) Handles btnStep2.Click 'When Button "Step2" is clicked then do...
  16.         picBoxStep.ImageLocation = "pic2.png" 'Sets the PictureBox to a image which contains the visual for step 2
  17.         PicBoxStepText.ImageLocation = "picword2.jpg" 'Sets the PictureBox to a image which contains the words for step 2
  18.         PicBoxStepText.Visible = True 'When buttonStep 2 is clicked, show the text of what step two is
  19.         picBoxStep.Visible = True 'When buttonStep 2 is clicked, show the image of what step two is
  20.         btnStep3.Enabled = True 'Allow the user to go to the next step
  21.     End Sub
  22.  
  23.     Private Sub btnStep3_Click(sender As Object, e As EventArgs) Handles btnStep3.Click 'When Button "Step2" is clicked then do...
  24.         picBoxStep.ImageLocation = "pic3.png" 'Sets the PictureBox to a image which contains the visual for step 3
  25.         PicBoxStepText.ImageLocation = "picword3.jpg" 'Sets the PictureBox to a image which contains the words for step 3
  26.         PicBoxStepText.Visible = True 'When buttonStep 3 is clicked, show the text of what step three is
  27.         picBoxStep.Visible = True 'When buttonStep 3 is clicked, show the image of what step three is
  28.         btnHome.Enabled = True 'Allow the user to return to the HomePage
  29.     End Sub
  30.  
  31.     Private Sub btnHome_Click(sender As Object, e As EventArgs) Handles btnHome.Click 'When the User Clicks the Button "Home" do this..
  32.         MemoryGame.Home() 'Calls the home subroutine from the form "Memorygame", which opens that form
  33.         Me.Hide() 'closes the current form (Help page)
  34.         lblWelcome.Visible = True 'Makes the text visable again so the user can come back and view the help again
  35.         lblOverview1.Visible = True 'Makes the text visable again so the user can come back and view the help again
  36.         lblOverview2.Visible = True 'Makes the text visable again so the user can come back and view the help again
  37.         picBoxStep.ImageLocation = "pic1.png" 'Sets the PictureBox back to the first step
  38.         PicBoxStepText.ImageLocation = "picword1.jpg" 'Sets anther PictureBox back to the first step
  39.         PicBoxStepText.Visible = False 'Hides the PictureBox containing the Words of the first step
  40.         picBoxStep.Visible = False 'Hides the picturebox containing the image of the first step
  41.         btnStep2.Enabled = False 'Disables the second step button
  42.         btnStep3.Enabled = False 'Disables the third step button
  43.     End Sub
  44.  
  45. End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement