Data Types VB.Net

Class Program
    Shared Sub Main()        
        Dim string1 As String = "Today is " + Date.Now.ToString("D") + "."  
        Console.WriteLine(string1)
        
    End Sub
End Class