Trouver la date du lundi dans une semaine avec VB.NET

J'ai besoin de trouver un moyen de trouver la date (JJ/MM/AAAA) du lundi pour toute la semaine nous sommes.

Par exemple, pour cette semaine, du lundi serait le 09/11/2009, et si c'était la semaine prochaine, ça serait 16/11/2009.

J'ai réussi à obtenir quelque part dans les formes de code, mais je n'ai eu "ne peut pas convertir Integer' erreurs. J'ai été en utilisant ce Jour.Aujourd'hui et AddDays().

Merci pour toute aide. 🙂

source d'informationauteur Willis

  1. 35

    Si le dimanche est le premier jour de la semaine, vous pouvez simplement faire ceci:

    Dim today As Date = Date.Today
Dim dayDiff As Integer = today.DayOfWeek - DayOfWeek.Monday
Dim monday As Date = today.AddDays(-dayDiff)

    Si le lundi est le premier jour de la semaine:

    Dim today As Date = Date.Today
Dim dayIndex As Integer = today.DayOfWeek
If dayIndex < DayOfWeek.Monday Then
    dayIndex += 7 'Monday is first day of week, no day of week should have a smaller index
End If
Dim dayDiff As Integer = dayIndex - DayOfWeek.Monday
Dim monday As Date = today.AddDays(-dayDiff)
  2. 5

    DateTime.DayOfWeek est un enum qui indique quel jour d'une date donnée. Comme le lundi est 1, vous pouvez trouver le lundi de la semaine en cours en utilisant le code suivant:

    Dim monday As DateTime = Today.AddDays((Today.DayOfWeek - DayOfWeek.Monday) * -1)
  3. 2
    =Format(DateAdd("d", (-1 * WeekDay(Date.Today()) + 2), Date.Today()), "dd/MM/yyyy")
  4. 1

    Une méthode simple devrait vous obtenir ce que vous voulez:

        private static DateTime GetMondayForWeek(DateTime inputDate)
    {
        int daysFromMonday = inputDate.DayOfWeek - DayOfWeek.Monday;
        return inputDate.AddDays(-daysFromMonday);
    }

    Vous pouvez également étendre à toute la journée que vous souhaitez ainsi:

        private static DateTime GetDayForWeek(DateTime inputDate, DayOfWeek inputDay)
    {
        int daysAway = inputDate.DayOfWeek - inputDay;
        return inputDate.AddDays(-daysAway);
    }

    D'appeler le premier exemple qui vient d'utiliser quelque chose comme:

    DateTime mondayDate = GetMondayForWeek(new DateTime(2009, 11, 15));
Console.WriteLine(mondayDate);
  5. 1

    Une autre approche si le lundi est le premier jour, est-ce:

     Dim today As Date = Date.Today
                Dim dayDiff As Integer = today.DayOfWeek - DayOfWeek.Monday
                Dim monday As Date = today.AddDays(-dayDiff)

                dayDiff = DayOfWeek.Saturday - today.DayOfWeek + 1
                Dim sunday As Date = today.AddDays(dayDiff)
  6. 0

    Il y a un jour de la semaine de la méthode que vous pouvez utiliser

    Dim instance As DateTime
Dim value As DayOfWeek

value = instance.DayOfWeek

    voir: http://msdn.microsoft.com/en-us/library/system.datetime.dayofweek.aspx

  7. 0

    J'ai juste fait ce dans un projet que je suis en train de travailler sur --je vous promets, c'est correct. C'est une méthode qui retourne la nième lundi après la date donnée. Si la date est lundi, il renvoie le lundi suivant.

    Public Function GetSubsequentMonday(ByVal startDate As DateTime, ByVal subsequentWeeks As Integer) As DateTime
    Dim dayOfWeek As Integer = CInt(startDate.DayOfWeek)
    Dim daysUntilMonday As Integer = (Math.Sign(dayOfWeek) * (7 - dayOfWeek)) + 1
    'number of days until the next Monday
    Return startDate.AddDays(CDbl((daysUntilMonday + (7 * (subsequentWeeks - 1)))))
End Function
  8. 0

    La suite de mes commentaires Méta-Chevalier de la réponse, voici une petite fonction qui fait la correction que je mentionne dans les commentaires:

    Public Function GetFirstOfLastWeek() As DateTime
Dim today As DateTime, daysSinceMonday As Integer
    today = DateTime.Today
    daysSinceMonday = today.DayOfWeek - DayOfWeek.Monday
    If daysSinceMonday < 0 Then
        daysSinceMonday += 7
    End If
    Return today.AddDays(-daysSinceMonday)  
End Function
  9. 0

    Et si votre semaine commence le lundi, alors vous pouvez utiliser quelque chose comme ceci:

    DateTime mondayDate = DateTime.Now.AddDays(((DateTime.Now.DayOfWeek == DayOfWeek.Sunday?7: (int)DateTime.Now.DayOfWeek) - 1)*-1);

DateTime sundayDate = DateTime.Now.AddDays(7 - (DateTime.Now.DayOfWeek == DayOfWeek.Sunday?7: (int)DateTime.Now.DayOfWeek ));