Problem mit der AddDay-Methode

28/08/2007 - 15:44 von Nicolas Nickisch | Report spam
Hi NG,
der folgende Code bereitet Probleme. Es wird einfach kein Tag zu 'start'
hinzuaddiert.
Dabei hört sich alles so einfach an in der Doku ...

Private Sub DateTimePicker1_ValueChanged(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles DateTimePicker1.ValueChanged

Debug.Print(DateTimePicker1.Value.Month)

Dim i As Control

Dim start As Date

start = New Date(DateTimePicker1.Value.Year, DateTimePicker1.Value.Month, 1)

For Each i In Panel1.Controls

i.Text = start.ToShortDateString & "(" & start.DayOfWeek

start.AddDays(1.0)

Debug.Print(start.ToLongDateString)

Next

End Sub





Gruss Nico
 

Lesen sie die antworten

#1 Karsten Sosna
28/08/2007 - 16:12 | Warnen spam
start.AddDays(1.0)



Hallo Nicolas,
AddDays ist eine Funktion:
\\\
start = start.AddDays(1.0)
///
Gruß Scotty

Ähnliche fragen