Visual Basic dilinde bugüne ait tarihi getirmek için farklı yöntemler vardır. Aşağıdaki örnekleri inceleyelim..

Module ModuleTest
    Sub Main()
        Dim bugun As DateTime = System.DateTime.Today
        Dim bugun2 As String = DateTime.Today.ToString("d/MM/yyyy")
        Dim bugun3 As String = DateTime.Now.ToString("d/MM/yyyy")
        Dim bugun4 As String = DateTime.Now.Date.ToShortDateString()

        Console.WriteLine(bugun)
        Console.WriteLine(bugun2)
        Console.WriteLine(bugun3)
        Console.WriteLine(bugun4)
        Console.ReadLine()
    End Sub
End Module