Imports System

​

Public Module Module1

    Public Sub Main()

        dim dateString = DateTime.Now.AddMonths(1).ToString("MM/dd/yyyy")

        Console.WriteLine(dateString)

    End Sub

End Module