Benutzereingabe prüffen

Prüfung ob die Eingabe Numeric 5(4,2) ist

Hallo Leute,

ich habe ein kleines Visual Basic Programm erstellt, dass mit Hilfe einer Gespeichterten Prozedur einen Wert in der Datenbank aktualisiert-ändert....
Dieser Wert (freq) ist eine numeric 5(4,2) in der Datenbank. Das programm nehmt die freq von einer Textbox und so wird sie mit der SP aktualisiert. Ich will jetzt sicher sein ob die Eingabe vom benutzter richtig ist, also das richtige Format hat damit in der Datenbank keinen Falschen Werte eingegeben werden oder die Prozedur mit einem Unbekannten Fehler platzt. Ich dachte ich versuche mal

if not isnumeric(freq)
msgbox "Der Wert ist falsch"
End if

Aber mit isnumeric werden wohl die Negativen Zahlen nicht überprüft und in der Datenbank sind Negative Zahlen nicht erlaubt. Ausserdem würde ich gerne dass die Zahl zwischen 0.1 und 10 ist...

Wenn ich noch eine Prüfung im Code haben muss bitte schreibt es mir. Ich will einfach mal sehen wie diese Prüfungen von jemandem mit großer Erfahrung definiert werden...

Danke im voraus
und viele liebe Grüße

Praktikantin

Private Sub Button_Click()

    On Error GoTo SendErrMsg 'Error wenn folgender Test Not Numeric  
    
    If TextBox < 0.1 Or TextBox > 10 Then GoTo SendErrMsg
    
   '..........  

    Exit Sub

SendErrMsg:
    Hide
    MsgBox "Der Wert ist falsch"  
    Show
End Sub

Private Sub Button_Click()

    If IsNumeric(TextBox) Then
        If TextBox < 0.1 Or TextBox > 10 Then GoTo SendErrMsg
    Else
        GoTo SendErrMsg
    End If
    
   '..........  

    Exit Sub

SendErrMsg:
    Hide
    MsgBox "Der Wert ist falsch"  
    Show
End Sub

    On Error GoTo SendErrMsg
    If TextBox < 0.1 Or TextBox > 10 Then GoTo SendErrMsg

    If IsNumeric(TextBox) Then
        If TextBox < 0.1 Or TextBox > 10 Then GoTo SendErrMsg
    Else
        GoTo SendErrMsg
    End If