Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim counter As Integer = 0
        Dim Message As String
        If CheckBox1.CheckState = CheckState.Checked Then

            Message = CheckBox1.Text & vbNewLine
            counter = counter + 1
            MessageBox.Show("You have chosen" & counter & "soaps")



        ElseIf CheckBox1.CheckState = CheckState.Unchecked Then
            Message = CheckBox1.Text & vbNewLine

        End If

        If CheckBox2.CheckState = CheckState.Checked Then

            Message = CheckBox2.Text & vbNewLine
            counter = counter + 1
            MessageBox.Show("You have chosen" & counter & "soaps")




        ElseIf CheckBox2.CheckState = CheckState.Unchecked Then

            Message = CheckBox2.Text & vbNewLine

            If CheckBox3.CheckState = CheckState.Checked Then

                Message = CheckBox3.Text & vbNewLine
                counter = counter + 1
                MessageBox.Show("You have chosen" & counter & "soaps")




            ElseIf CheckBox3.CheckState = CheckState.Unchecked Then

                Message = CheckBox3.Text & vbNewLine

                If CheckBox4.CheckState = CheckState.Checked Then

                    Message = CheckBox4.Text & vbNewLine
                    counter = counter + 1
                    MessageBox.Show("You have chosen" & counter & "soaps")




                ElseIf CheckBox4.CheckState = CheckState.Unchecked Then
                    Message = CheckBox4.Text & vbNewLine

                    If CheckBox5.CheckState = CheckState.Checked Then

                        Message = CheckBox5.Text & vbNewLine
                        counter = counter + 1
                        MessageBox.Show("You have chosen" & counter & "soaps")




                    ElseIf CheckBox5.CheckState = CheckState.Unchecked Then

                        Message = CheckBox5.Text & vbNewLine

                    End If



                End If
            End If

        End If
    End Sub
End Class