MonthCalendar, как запретить переключение месяцев - VB
Формулировка задачи:
В элементе MonthCalendar имеются кнопочки перехода от месяца к месяцу, как можно их отключить? Спасибо.
Решение задачи: «MonthCalendar, как запретить переключение месяцев»
textual
Листинг программы
Dim x As Date = DateAdd(DateInterval.Day, 20, Date.Today) 'дата отличающаяся от сегодняшней на 20 дней Dim y As Date = MonthCalendar1.SelectionRange.Start 'Выделенная в календаре дата If x < y Then ' Если новая дата, больше сегодняшней на 20 дней ставим выделение 'на календаре на сегодняшний день MonthCalendar1.SetDate(Date.Today) End If
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д