Visual Basic .NET - Read Less - Learn More/Visual_Basic.NET_Read_Less_Learn_More_Richard_Bowman_Visual_2002.iso/Resources/Code/Ch4-UsingIfStatement/Module1.vb

Text File | 2001-07-12 | 383b | 16 lines

Module Module1

    Sub Main()
        Console.WriteLine("Enter a number:")
        Dim x As Integer = CInt(Console.ReadLine())

        If x < 5 Then
            Console.WriteLine("That is small.")
        Else
            Console.WriteLine("Good choice.")
        End If
        Console.ReadLine()      ' wait for user to press Enter
    End Sub

End Module