Date Time VB.Net

Imports System.Globalization
Module MainClass
   Public Sub Main()
        
        Dim july28 As New DateTime(2009, 7, 28, 5, 23, 15, 16)
        Dim culture As New System.Globalization.CultureInfo("fr-FR", True)
        
        Dim july28Formats As String()
        july28Formats = july28.GetDateTimeFormats(culture)
        
        For Each format As String In july28Formats
           Console.WriteLine(format)
        Next 
   End Sub
End Module