How to check if text box max length has been exceeded?

'How to check if text box max length has been exceeded?
'http://stackoverflow.com/questions/26534314/how-to-check-if-text-box-max-length-has-been-exceeded
'Corrected logic (simplified using message boxes).

Public Class Form1
    Private Sub Textbox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        If Not IsNumeric(TextBox1.Text) Then
            If TextBox1.Text.Length > 8 Then
                MessageBox.Show("Non-numeric and >8!")
            ElseIf TextBox1.Text.Length > 0 Then
                MessageBox.Show("Non-numeric!")
            Else
                MessageBox.Show("No errors!")
            End If
        Else
            If TextBox1.Text.Length > 8 Then
                MessageBox.Show("> 8!")
            Else
                MessageBox.Show("No errors!")
            End If
        End If
    End Sub
End Class