Private Sub Textboxes_Validating(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles textbox1.Validating, textbox2.validating
If CType(sender, TextBox).Text = "" Then
ErrorProvider1.SetError(sender, "This field cannot be emtpy")
Else
ErrorProvider1.SetError(sender, "")
End If