Question about the Error Provider

[gearbolt]

Can you use one error provider to validate multiple controls on a form. I am using one on a form that will validate the controls the first time there is an error in the first control but if the error is fixed in the first control and not fixed in the secon control the error provider goes away. Is there something wrong with the code that I have posted below. It checks two text boxes and makes sure that they contain Alpha characters and not Numeric numbers as the first character.



Private Sub txtAccountName_Validating(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles txtAccountName.Validating

If IsNumeric(txtAccountName.Text) Then
ErrorProvider1.SetError(txtAccountName, "Not a numeric value.")
Else
' Clear the error.
ErrorProvider1.SetError(txtAccountName, "")
End If


End Sub

Private Sub txtIssuingBank_Validating(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles txtIssuingBank.Validating

If IsNumeric(txtAccountName.Text) Then
ErrorProvider1.SetError(txtIssuingBank, "Not a numeric value.")
Else
' Clear the error.
ErrorProvider1.SetError(txtIssuingBank, "")
End If

[trisuglow]

The code you posted checks txtAccount name in both subroutines, ignoring txtIssuingBank. Apart from that, this code looks ok to me.

Private Sub txtAccountName_Validating(ByVal sender As Object, _
ByVal e As System.ComponentModel.CancelEventArgs) Handles _
txtAccountName.Validating
 
If IsNumeric(txtAccountName.Text) Then
ErrorProvider1.SetError(txtAccountName, "Not a numeric value.")
Else
' Clear the error.
ErrorProvider1.SetError(txtAccountName, "")
End If
 
 
End Sub
 
Private Sub txtIssuingBank_Validating(ByVal sender As Object, _
ByVal e As System.ComponentModel.CancelEventArgs) Handles _
txtIssuingBank.Validating
 
If IsNumeric([b]txtAccountName.Text[/b]) Then
ErrorProvider1.SetError(txtIssuingBank, "Not a numeric value.")
Else
' Clear the error.
ErrorProvider1.SetError(txtIssuingBank, "")
End If

[gearbolt]

Thanks trisuglow for catching that error. I thought I fixed it before.

Thanks

[MasterBlaster]

Argh, It's much eaiser to keep track of if you validate all your controls in the same spot

        Private Sub TextBox_Validating(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) _
  Handles txtAccountName.Validating, txtIssuingBank.Validating
                Dim Control As Windows.Forms.Control = sender
                If IsNumeric(Control.Text) Then
                    ErrorProvider1.SetError(Control, "Not a numeric value.")
                Else
                    ' Clear the error.
                    ErrorProvider1.SetError(Control, "")
                End If
            End Sub