Imports System

Public Module Module1

    Public Sub Main()

        Dim myBool As Boolean = False

        Dim myDate As Date?

​

        Console.WriteLine("Start")

        If myBool Then

             myDate = Date.Today

        End If

        Console.WriteLine(myDate)

        Console.WriteLine("Finished")

    End Sub

End Module