Statements VB.Net Tutorial

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!