lykke med dayofweek

Noget i denne stil ?

Dim day1 As System.DayOfWeek = dateTimePicker1.Value.DayOfWeek
Dim day2 As System.DayOfWeek = dateTimePicker2.Value.DayOfWeek

Dim currentDay As Integer = System.Math.Min(CType(day1, Integer), CType(day2, Integer))
Dim maxDay As Integer = System.Math.Max(CType(day1, Integer), CType(day2, Integer))

While currentDay <= maxDay
' Do stuff...
System.Windows.Forms.MessageBox.Show(CType(currentDay, System.DayOfWeek).ToString)
currentDay += 1
End While

Hej

Dutter ikke hvis du f.eks. vælger tirsdag den 17 og tirsdag den 24 i januar
kommer der kun tirsdag hvis du vælger tirsdag den 17 og onsdag den 25 kommer
tirsdag og onsdag . men ikke de mellemliggnede dage

LN

Åh, jeg havde nok misforstået det en anelse. Men nedenstående skulle gøre det du ønsker.

Dim date1 As System.DateTime = DateTimePicker1.Value
Dim date2 As System.DateTime = DateTimePicker2.Value

Dim currentDate As System.DateTime
Dim maxDate As System.DateTime

If (date1.Date <= date2.Date) Then
  currentDate = date1
  maxDate = date2
Else
  currentDate = date2
  maxDate = date1
End If

While currentDate.Date <= maxDate.Date
  ' Do stuff...
  System.Windows.Forms.MessageBox.Show(currentDate.DayOfWeek.ToString())
  currentDate = currentDate.AddDays(1)
End While

Dejligt tak for hjælpen

ligger du et svar

Ln

Det var da så lidt :)