格里高利历(GregorianCalendar)星期几 [英] GregorianCalendar day of the week

问题描述

大家好

 如何获得与去年相同的今天?例如今天是2月12日(星期四)，从去年2月13日开始

  how to get today's equivalent of last year ? like  today is Thursday, Feb 12, Well the equivalent "Thursday" from last year was on Feb 13

谢谢

Dim MyCalendar As Calendar = New GregorianCalendar
        Dim culture = New System.Globalization.CultureInfo("EN-US")

        Dim dayname As String = culture.DateTimeFormat.GetDayName(Now.DayOfWeek)

        Dim lastCurrentweek = MyCalendar.GetWeekOfYear(
          Now,
          CalendarWeekRule.FirstFourDayWeek,
          DayOfWeek.Sunday
      )
        Dim lastCurrentyear = MyCalendar.GetYear(Now) - 1

Dim dayrecord = (
                From Row In eventcal.AsEnumerable
               Where MyCalendar.GetWeekOfYear(Row.Field(Of DateTime)("date"),
                                              CalendarWeekRule.FirstFourDayWeek,
                                              DayOfWeek.Sunday) = Currentweek And MyCalendar.GetYear(Row.Field(Of DateTime)("date")) = lastCurrentyear And _

MyCalendar.GetDayOfWeek(Row.Field(Of DateTime)((quot;日期"))=天名 选择Row.Field(Of Double)("sales") )

MyCalendar.GetDayOfWeek(Row.Field(Of DateTime)("date")) = dayname Select Row.Field(Of Double)("sales") )

推荐答案

我可能会自己回答！

这篇关于格里高利历(GregorianCalendar)星期几的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！