I have problem with this code;

If (e.KeyChar < Chr(48) Or e.KeyChar > Chr(57)) And (e.KeyChar <> Chr(8)) Then
e.Handle = True

End If

I need a code that trap non numeric key and allow backspace and period!