Imports System

Public Module Module1

    Public Sub Main()

        Dim ClassVotes(29) as integer

        Dim Candidate1 as integer

        Dim Candidate2 as integer

        Dim Candidate3 as integer

        Dim Candidate4 as integer

        Dim Candidate1Name as string = "N"

        Dim Candidate2Name as string = "N"

        Dim Candidate3Name as string = "N"

        Dim Candidate4Name as string = "N"

        Dim NumberC as integer

        Dim Winner as string = "No overall Winner"

        console.writeline("Welcome to Candidate Vote Calculator")

        console.writeline("Please input the number of candidates")

        Start: NumberC = console.readline()

        if NumberC > 4 or NumberC <= 1 then

            console.writeline("Error please re-input number of candidates")

        goto Start

        end if 

        if NumberC = 2 then

                Candidate4 = 0

                Candidate3 = 0

            console.writeline("Input names of the two candidates")

            Candidate1Name = console.readline()

            Candidate2Name = console.readline()

            goto TwoCandidates

            Else if NumberC = 3 then 

                    Candidate4 = 0

                console.writeline("Input names of the three candidates")

            Candidate1Name = console.readline()

            Candidate2Name = console.readline()

            Candidate3Name = console.readline()

                goto ThreeCandidates

                else if NumberC = 4 then

                    console.writeline("Input names of the four candidates")

            Candidate1Name = console.readline()

            Candidate2Name = console.readline()

            Candidate3Name = console.readline()

            Candidate4Name = console.readline()

                goto FourCandidates

                    end if 

                TwoCandidates: console.writeline("Please input the number of votes " & Candidate1Name & " recived.")

                Start2: Candidate1= console.readline()

                console.writeline("Please input the number of votes " & Candidate2Name & " recived.")

                Candidate2 = console.readline()

                if Candidate1 + Candidate2 > 30 then

                    console.writeline("Error please re-input your votes")   

                    goto Start2

                end if 

                console.writeline("The Number of votes " & Candidate1Name & " received is " & Candidate1)

                console.writeline("The Number of votes " & Candidate2Name & " received is " & Candidate2)

                    if Candidate1 > Candidate2 then

                    Winner = Candidate1Name

                else if Candidate2 > Candidate1 then

                        Winner = Candidate2Name

                    end if 

                console.writeline("The candidate who won was " & Winner) 

                goto En

                ThreeCandidates: console.writeline("Please input the number of votes " & Candidate1Name & " recived.")

                Start3: Candidate1= console.readline()

                console.writeline("Please input the number of votes " & Candidate2Name & " recived.")

                Candidate2 = console.readline()

                console.writeline("Please input the number of votes " & Candidate3Name & " recived.")

                Candidate3 = console.readline()

                if Candidate1 + Candidate2 + Candidate3 > 30 then

                    console.writeline("Error please re-input your votes")   

                    goto Start3

                end if 

                console.writeline("The Number of votes " & Candidate1Name & " received is " & Candidate1)

                console.writeline("The Number of votes " & Candidate2Name & " received is " & Candidate2)

                console.writeline("The Number of votes " & Candidate3Name & " received is " & Candidate3)

                    if Candidate1 > Candidate2 and Candidate3 then

                    Winner = Candidate1Name

                else if Candidate2 > Candidate1 and Candidate3 then

                        Winner = Candidate1Name

                    else if Candidate3 > Candidate1 and Candidate2 then

                            Winner = Candidate3Name

                        end if 

                console.writeline("The candidate who won was " & Winner) 

                goto En

                    FourCandidates: console.writeline("Please input the number of votes " & Candidate1Name & " recived.")

                Start4: Candidate1= console.readline()

                console.writeline("Please input the number of votes " & Candidate2Name & " recived.")

                Candidate2 = console.readline()

                console.writeline("Please input the number of votes " & Candidate3Name & " recived.")

                Candidate3 = console.readline()

                console.writeline("Please input the number of votes " & Candidate4Name & " recived.")

                Candidate4 = console.readline()

                if Candidate1 + Candidate2 + Candidate3 + Candidate4 > 30 then

                    console.writeline("Error please re-input your votes")   

                    goto Start4

                end if 

                console.writeline("The Number of votes " & Candidate1Name & " received is " & Candidate1)

                console.writeline("The Number of votes " & Candidate2Name & " received is " & Candidate2)

                console.writeline("The Number of votes " & Candidate3Name & " received is " & Candidate3)

                console.writeline("The Number of votes " & Candidate4Name & " received is " & Candidate4)

                if Candidate1 > Candidate2 and Candidate3 and Candidate4 then

                    Winner = Candidate1Name

                else if Candidate2 > Candidate1 and Candidate3 and Candidate4 then

                        Winner = Candidate2Name

                    else if Candidate3 > Candidate1 and Candidate2 and Candidate4 then

                            Winner = Candidate3Name

                        else if Candidate4 > Candidate1 and Candidate2 and Candidate3 then

                                Winner = Candidate4Name

                            end if 

                console.writeline("The candidate who won was " & Winner) 

                goto En

                    En: console.writeline("Done")

                             End Sub

End Module