Imports System
Public Module Module1
Public Sub Main()
Dim score As Integer
Console.WriteLine("Please enter your score")
score = Console.ReadLine()
If score>=100 and score<=180
Console.WriteLine("What a great score! Well done.")
Else If score>=0 and score<10
Console.WriteLine("That was rubbish! Get Practising.")
End If
End Sub
End Module