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