Procedura dotycząca wpisywania wartości liczbowych

Procedura ta ma za zadanie informowanie użytkownika programu o błędnym wpisaniu do okienka textbox zamiast wartości liczbowych,  innych znaków. Tak jak w poprzedniej procedurze, należy kliknąć dwa razy w okienko i po wyświetleniu procedury wpisać kod.
Private Sub txtEnz_TextChanged (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtEnz.TextChanged
       If txtEnz.Text  = "" Then Exit Sub
      If Not IsNumeric(txtEnz.Text) Then
           MessageBox.Show("Wpisz tutaj tylko wartość liczbową.","Uwaga")
           txtEnz.Text  = ""
           Exit Sub
    End if