Imports System

'this is using the for next statement in visual BASIC

Public Module Module1

Public Sub Main()

        dim count as integer

        dim number as decimal

        dim total as decimal

        For count = 1 to 5

        console.WriteLine("Enter your number")

        number=console.ReadLine()

        If number=6 then

            console.writeline("You entered a 6") 

        end if

        total = total + number

        next

        console.writeline("The total is ") 

        console.writeline(total)

End Sub

End Module