Как разрешить значение дня, переместив месяц в DateTimePicker

Question

Текущая дата, например, 30 апреля 2020 г. - 30/4/20, но пользователь хочет ввести 31/5/20. Но когда набирается «31», появляется «1», поскольку, конечно, в апреле всего 30 дней

Как можно было бы поймать тип «31» и динамически продвинуть месяц на 05? Есть ли событие, которое может поймать набранное 31 до того, как dtp переопределит и исправит 1

1) Перехватит то, что набрано до того, как dtp исправит
2) Если набранный день> максимального количества дней в месяце, ТО продвигайте месяц на 1 (например, с апреля по май)

Есть идеи, пожалуйста?

Answer 1

Module Module1

    Sub Main()
        Console.Title = "Type some Number from 0 to 31"
        Dim input_number As Integer
        input_number = Console.ReadLine
        If input_number > DateTime.DaysInMonth(DateTime.Now.Year, DateTime.Now.Month) Then
            Dim newdate As String = Date.Now.AddMonths(1)
            Console.ForegroundColor = ConsoleColor.Green
            Console.WriteLine(newdate)
        End If
        Console.ReadKey()
    End Sub

End Module