Imports System

Imports Microsoft.VisualBasic

Public Module Module1

    Public Sub Main()

        Dim strFormattedval As String = CStr(Format(DateTime.Now, "dd/MM/yyyy hh:mm"))

        Console.WriteLine(strFormattedval)

    End Sub

End Module