Hjelp til datofunksjon i Visual Basic. Net

[Kurderen 52]

Hei

 

Kan noen hjelpe meg å lage eller vise til et sted der jeg kan finne en code for dato frem i tid. Det jeg trenger er at hvis jeg i dag den 27.07.19 klikker på knappen som jeg tilordner coden at den skal uavhengig av dato i måneden alltid sette datoen to måneder frem i tid pluss for eksempel 5 dager. Så resultatet blir 05.09.19 som output. Og uansett hvilken dag i august man bruker knappen vises det 05.10.19 og 05.11.19 når man er i september. Også videre..

 

Skal tilknyttes en makro-tastatur med tilhørende programvare som støtter VB.

 

Fant noe som ikke er helt komplett.

dateAfterMonth = DateTime.Now.AddMonths(1)

 

 

Noen ideer?

 

 

Takker

[ahw_ 112]

Imports System

Imports System.Globalization


Dim monthsToAdd As Integer = 2

Dim daysToAdd As Integer = 5

Dim format As String = "dd.MM.yy"

Dim parsedDate As DateTime = Date.ParseExact("27.07.19", format, CultureInfo.InvariantCulture) ' Date.Now

Dim tempDate As DateTime = New DateTime(parsedDate.Year, parsedDate.Month, 1).AddMonths(monthsToAdd)

Dim futureDate As DateTime = new DateTime(tempDate.Year, tempDate.Month, 1).AddDays(daysToAdd - 1)


Console.WriteLine(futureDate.ToString(format)) ' 05.09.19


' 10.08.19 -> 05.10.19

' 15.09.19 -> 05.11.19

' 20.10.19 -> 05.12.19

' 25.11.19 -> 05.01.20

' 30.12.19 -> 05.02.20

 

Edited July 27, 2019 by ahw_

[Kurderen 52]

Skal prøve den. Tusen takk