Visual Basic - Ayuda con codigo

Hola programadores :
Estoy usando esta sentencia para que me permita teclear solo numeros, y funciona muy bien pero cuando presione backspace para borrar NO BORRA , que deberia hacer para que borre con esta tecla ??

If InStr("0123456789.,", Chr(KeyAscii)) = 0 Then KeyAscii = 0

If InStr("0123456789.,", Chr(KeyAscii)) = 0 And KeyAscii <> 8 Then
KeyAscii = 0
End If

Graciass !!!!!!!!! funciona a la perfeccion !!!!