Imports System

Imports System.Globalization

Public Module Module1

    Public Sub Main()

        Dim fecha = "09/13/2017"

        dim fechaConvertida as DateTime

        DateTime.TryParseExact(fecha, "MM/dd/yyyy", CultureInfo.CurrentCulture, DateTimeStyles.None, fechaConvertida)

        Console.WriteLine(fechaConvertida.ToString("dd/MM/yyyy"))

    End Sub

End Module