如何讓它delete?!(編號:6813)

我看一個網站上面說明keypress只能輸入數字 的範例是這樣
Private Sub Form_KeyPress(KeyAscii As Integer)
Select Case Chr(KeyAscii)
Case "0", "1", "2", "3", "4", "5", "6", "7", "8", "9"
Case Else
KeyAscii = 0 '攔截文字產生
End Select
End Sub
我照他上面試..結果雖然不能打其他文字.... 但是我如果輸入錯誤的數字而我想要delete掉.... 結果卻不能delete?! 這是為什麼?!那麼要怎麼寫他才可以有delete功能呢?!
謝謝~~