Sub Main() Dim intInput As Integer
Console.WriteLine("Enter a temperature...")
intInput = Val(Console.ReadLine()) If intInput > 75 Then
Console.WriteLine("Too hot!")
ElseIf intInput < 55 Then
Console.WriteLine("Too cold!")
Else
Console.WriteLine("Just right!") End If End Sub