If with And : If « Statements « VB.Net Tutorial

1. VB.Net Tutorial
2. Statements
3. If

Imports System

Public Class Test

     Shared Sub Main()
        Dim dtCurrent As System.DateTime
        Dim iHour As Integer

        dtCurrent = dtCurrent.Now()
        iHour = dtCurrent.Hour

        If (iHour < 12) Then
            Console.Writeline("Good Morning!")
        ElseIf (iHour >= 12) And (iHour < 18) Then
            Console.WriteLine("Good Afternoon!")
        Else
            Console.WriteLine("Good Evening!")
        End If
    End Sub

End Class

Good Afternoon!