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

ИИ для рефератов и докладов


  • Экспорт Word по ГОСТу
  • Минимум 80% уникальности текста
  • Поиск релевантных источников в интернете
  • Готовый документ за 2 минуты

Оцени полезность:

6   голосов , оценка 4 из 5
Похожие ответы