DateTimePicker 仅适用于当前月份

Posted 2023-03-30

【中文标题】DateTimePicker 仅适用于当前月份

【英文标题】：DateTimePicker only for current Month

【发布时间】：2018-11-10 08:16:51

【问题描述】：

我在表单中有一个DateTimePicker。我需要限制用户只能从当前月份中选择一个日期：例如，从 1 November 2018 到 30 November 2018。

我尝试了这些代码行：

DtpIssue.MinDate = New Date Time(DateTime.Now.Year, DateTime.Now.Month, 1)
DtpIssue.MaxDate = New Date Time(DateTime.Now.Year, DateTime.Now.Month, 1)

但它只显示当前日期：10 November 2018。 我应该怎么做才能修复 DateTimePicker 的当前月份？

【参考方案1】：

一个月的最后一天由DateTime.DaysInMonth() 返回，传递当前的年份和月份。

Dim FirstOfMonth As Date = New DateTime(Date.Now.Year, Date.Now.Month, 1)
Dim EndOfMonth As Date = 
    New DateTime(Date.Now.Year, Date.Now.Month, Date.DaysInMonth(Date.Now.Year, Date.Now.Month))

以类似的格式，应用于您的控件：

DtpIssue.MinDate = New Date(Today.Year, Today.Month, 1)
DtpIssue.MaxDate = New Date(Today.Year, Today.Month, Date.DaysInMonth(Today.Year, Today.Month))