Imports System
Public Module Module1
Public Sub Main()
Dim returnDate AS DateTime
If Date.TryParse("03:00:00", returnDate) then
Console.WriteLine("Hello World {0}", returnDate)
Else
Console.WriteLine("Goodbye World")
End If
End Sub
End Module