DateTimePicker только для текущего месяца - PullRequest
0 голосов
/ 10 ноября 2018

У меня есть 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 Ответ

0 голосов
/ 10 ноября 2018

Последний день месяца возвращается 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))
...