Запретить ввод даты в MaskedTextBox1 больше текущей даты - Visual Basic .NET

Узнай цену своей работы

Формулировка задачи:

На форме MaskedTextBox1 с маской под короткую дату, то есть __.__.____ Как запретить ввод в это поле даты, больше текущей даты? заранее спасибо за помощь!

Решение задачи: «Запретить ввод даты в MaskedTextBox1 больше текущей даты»

textual
Листинг программы
  1. Private Sub Button4_Click(sender As System.Object, e As System.EventArgs) Handles Button4.Click
  2. '…
  3.     MsgBox(MaskedTextBox1.Text)
  4. '
  5. End Sub
  6. Private Sub MaskedTextBox1_TypeValidationCompleted(sender As System.Object, e As System.Windows.Forms.TypeValidationEventArgs) Handles MaskedTextBox1.TypeValidationCompleted
  7.     If (Not e.IsValidInput) Then
  8.         MsgBox("Данные не соответствуют формату!")
  9.     Else
  10.         Dim UserDate As DateTime = CDate(e.ReturnValue)
  11.         If (UserDate > DateTime.Now) Then
  12.             MsgBox("Введенная дата не м.б. больше текущей даты!")
  13.             e.Cancel = True
  14.         End If
  15.     End If
  16. End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

7   голосов , оценка 4 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы