MY EASY BUT AMAZING CODE!

Public Class firstSetup

    Private Sub ReflectionImage1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub ReflectionImage1_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub ReflectionImage1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub Label7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub Label7_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click

    End Sub

    Private Sub PictureBox1_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox1.MouseEnter
        PictureBox1.BackgroundImage = My.Resources.buttonHOVER_NEXT
    End Sub

    Private Sub PictureBox1_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox1.MouseHover

    End Sub

    Private Sub PictureBox1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox1.MouseLeave
        PictureBox1.BackgroundImage = My.Resources.button_NEXT
    End Sub

    Private Sub Panel1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Panel1.Click
        'nr1
        If My.Settings.profileimg = "2" Then
            img2.Visible = False
            img3.Visible = False
            img4.Visible = False
            img1.Visible = True
            My.Settings.profileimg = "1"
        ElseIf My.Settings.profileimg = "3" Then
            img2.Visible = False
            img4.Visible = False
            img3.Visible = False
            img1.Visible = True
        Else
            If My.Settings.profileimg = "4" Then
                img3.Visible = False
                img2.Visible = False
                img4.Visible = False
                img1.Visible = True
            Else
                img1.Visible = True
                My.Settings.profileimg = "1"
                img3.Visible = False
                img2.Visible = False
                img4.Visible = False
            End If
        End If
    End Sub

    Private Sub Panel1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel1.Paint

    End Sub

    Private Sub Panel2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Panel2.Click
        'nr 2
        If My.Settings.profileimg = "1" Then
            img3.Visible = False
            img4.Visible = False
            img1.Visible = False
            img2.Visible = True
            My.Settings.profileimg = "2"
        ElseIf My.Settings.profileimg = "3" Then
            img1.Visible = False
            img4.Visible = False
            img3.Visible = False
            img2.Visible = True
        Else
            If My.Settings.profileimg = "4" Then
                img3.Visible = False
                img4.Visible = False
                img1.Visible = False
                img2.Visible = True
            Else
                img2.Visible = True
                My.Settings.profileimg = "2"
                img3.Visible = False
                img4.Visible = False
                img1.Visible = False

            End If
        End If
    End Sub

    Private Sub Panel2_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel2.Paint

    End Sub

    Private Sub Panel3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Panel3.Click
        'nr 3
        If My.Settings.profileimg = "1" Then
            img2.Visible = False
            img4.Visible = False
            img1.Visible = False
            img3.Visible = True
            My.Settings.profileimg = "3"
        ElseIf My.Settings.profileimg = "2" Then
            img2.Visible = False
            img4.Visible = False
            img2.Visible = False
            img3.Visible = True
        Else
            If My.Settings.profileimg = "4" Then
                img2.Visible = False
                img1.Visible = False
                img4.Visible = False
                img3.Visible = True
            Else
                img3.Visible = True
                My.Settings.profileimg = "3"
                img2.Visible = False
                img1.Visible = False
                img4.Visible = False
            End If
        End If
    End Sub

    Private Sub Panel3_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel3.Paint

    End Sub
End Class