Übergeben von Textfeldwerten in einem Ereignishandler

Question

Ich habe den folgenden Code, um zwei Textfeldeinträge zu überprüfen, um sicherzustellen, dass sie gültige Daten sind. Mein Problem ist, dass ich nicht herausfinden kann, wie der Textfeldwert als Argument übergeben wird, damit ich die Methode verwenden kann, um die Textüberprüfung von zwei verschiedenen Textfeldern zu verarbeiten. Hier ist, was ich bis jetzt habe:

Private Sub txtBirthdate_Validating(sender As System.Object, e As System.ComponentModel.CancelEventArgs) Handles txtBirthdate.Validating, txtSpouseBirthday.Validating 

    Try 
     If String.IsNullOrWhiteSpace(sender.ToString) Then 
      'Do Nothing 
     Else 
      Dim ReturnDate As DateTime 
      ReturnDate = validator.CheckIsValidDate(sender.ToString) 
      txtBirthdate.Text = ReturnDate.ToShortDateString 
     End If 
    Catch ex As Exception 
     Throw 
    End Try 

End Sub 

Danke!

Answer 1

Sie müssen die sender Objekt zu einem TextBox werfen auf die Eigenschaften zu erhalten:

Private Sub txtBirthdate_Validating(sender As Object, e As CancelEventArgs) _ 
    Handles txtBirthdate.Validating, txtSpouseBirthday.Validating 

    Try 
    With DirectCast(sender, TextBox) 
     If String.IsNullOrWhiteSpace(.Text) Then 
      'Do Nothing 
     Else 
      Dim ReturnDate As DateTime 
      ReturnDate = validator.CheckIsValidDate(.Text) 
      .Text = ReturnDate.ToShortDateString 
     End If 
    End With 
    Catch ex As Exception 
     Throw 
    End Try 
End Sub