Mega Code Archive

 

Categories / VB.Net Tutorial / Statements

 

If with And

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!