VB.NET DatetimePicker - 错误的周数

Question

我的vbnet扩展日期时间选择器有问题.当元素传递到新年(2016)时,左侧显示的周数是错误的.

我有一个"datetimepicker",它不是默认组件,它在这里下载:http: //www.codeproject.com/Articles/17063/ExtendedDateTimePicker-control-with-week-numbers

我不明白为什么日历从53转到2而不是53到1.

也许其中一个人有同样的错误.谢谢你的时间.

Answer 1

I don't understand why the calendar pass from 53 to 2 and not 53 to 1

它几乎按预期工作。按照计算周数的方式，2016 年的前 3 天算作 2016 年的第一周。

请注意，该控件不执行任何与日历或显示相关的操作。它只是改变Windows提供的日历窗口的显示样式。CP 页面上看到的代码就是全部，主要只是设置一个样式标志来告诉 Windows 添加周数：

style = style | MCS_WEEKNUMBERS;

MSDN 条目指出：

第 1 周定义为至少包含四天的第一周。

由于 1 月 1 日至 3 日不是 4 天，因此似乎存在错误、使用了不同的日历或 MSDN 已过时。

来自评论：

From what i understood, what's wrong is "date format". Maybe it's not a 8601

不，它不仅如此：ISO8601 是一个不同的日历，Windows 和 NET 都没有实现。 维基百科注释：

一年的第一周是包含该年第一个星期四的周（因此始终包含 1 月 4 日）。因此，在 1 月 1 日附近的某些天，ISO 周年编号与公历略有不同。

这是您在日历下拉列表中看到的内容。

选择

但 ISO8601 一年中的周数很容易计算：

GetISOWeekOfYear()从我对一个非常相似的问题的回答中的代码开始。您可以使用它在标签或 DTP 旁边的其他内容中显示所选日期的 ISO8601 一年中的第几周。

打印 2011 年至 2021 年第一周和最后一周的数字：

Dim cal As Calendar = CultureInfo.CurrentCulture.DateTimeFormat.Calendar
For n As Int32 = 2011 To 2017       '2021
    dt = New DateTime(n, 12, 21)
    Console.WriteLine(" ***** {0} *****", n)
    For j = 0 To 3
        Dim NetWk = cal.GetWeekOfYear(dt, CalendarWeekRule.FirstDay, firstD)
        Console.WriteLine("Invariant Date: {0} ISO #:{1:00}  NET #:{2:00}",
                          dt.ToString("MM/dd/yyyy"), GetISOWeekOfYear(dt), NetWk)
        dt = dt.AddDays(7)
    Next
Next

2015/2016 部分的结果：

***** 2015 *****
不变日期：12/21/2015 ISO #:52 NET #:52
不变日期：12/28/2015 ISO #:53 NET #:53
不变日期：01/04/ 2016 ISO #:01 NET #:02
不变日期：01/11/2016 ISO #:02 NET #:03
***** 2016 *****
不变日期：12/21/2016 ISO #:51 NET # :52
不变日期：12/28/2016 ISO #:52 NET #:53
不变日期：01/04/2017 ISO #:01 NET #:01
不变日期：01/11/2017 ISO #:02 NET #:02

除非您愿意从头开始编写自己的控件或许可一个可以设置为不同日历的控件（并且具有 ISO8601 的定义），否则这可能是您能做的最好的事情。

结论：周数没有错误。它使用的日历与您期望/想要的不同。

参考：

• 获取或转换 NET GetWeekOfYear() 为 ISO 周
• MSDN：月历控件样式
• 参考源中的 DateTimePicker