Imports System

Public Module Module1

    Public Sub Main()

        dim today as Datetime =Datetime.Now

        dim y as string = "dd / MM / yyyy"

        console.Write(today.ToString(y))

    End Sub

End Module