Sub() Block
Dim hour As Integer
Dim msg As String
hour = Date.Now.Hour
If hour >= 6 AndAlso hour <= 18 Then msg = "Good day" Else msg = "Good night"
Console.WriteLine(msg)
hour
End Block
should really be formatted like this:
Sub()
Dim hour As Integer
Dim msg As String
hour = Date.Now.Hour
If hour >= 6 AndAlso hour <= 18 Then msg = "Good day" Else msg = "Good night"
Console.WriteLine(msg)
hour
End Sub
This:
should really be formatted like this:
Block
End Sub