如何让textbox只能输入数字和删除数字

如何让textbox只能输入数字和删除数字，我知道使用like "#"可以只输入数字，但又不能删除，有谁可以为我解答！非常感谢！ --------------------编程问答-------------------- 楼主，我发现你的问题不少，但是，你这些问题，只要搜一下，就一大把 --------------------编程问答-------------------- Private Sub Text1_KeyPress(KeyAscii As Integer)
    If (KeyAscii >= Asc("0") And KeyAscii <= Asc("9")) Or KeyAscii = 8 Then
    Else
        KeyAscii = 0
    End If
End Sub --------------------编程问答-------------------- 一楼的不要浪费自己和别人的时间，我是楼主，也上网查过资料，但我对更你们有信心！希望你们能在解答问题时多给我启发而已，这才是对问题的应有态度。 --------------------编程问答-------------------- Private Sub Text1_change
    If not isnumeric(text1.text) Then
    ....
    End If
End Sub --------------------编程问答-------------------- 弊端：不能防止粘贴进来的非数字字符

API方法，xp会有气泡提示，api声明自己添加

Public Sub SetTextNumber(hwnd As Long, flag As Boolean)

    Dim tStyle As Long

    tStyle = GetWindowLong(hwnd, GWL_STYLE)
    If flag Then
       tStyle = tStyle Or ES_NUMBER
    Else
       tStyle = tStyle And (Not ES_NUMBER)
    End If

    Call SetWindowLong(hwnd, GWL_STYLE, tStyle)
    Call RedrawWindow(hwnd, ByVal 0&, ByVal 0&, &H1)
End Sub --------------------编程问答-------------------- 楼主,我也却你不要浪费自己和别人的时间
http://topic.csdn.net/t/20040423/03/2998755.html
http://www.programfan.com/club/showpost.asp?id=62677&t=o
http://www.qostudy.org/pr/Article/aspnet/vb/200605/18083.html
http://www.soft-hr.cn/view_hr.asp?id=27254
http://www.biirch.com/code/1/onlyNumber.htm
我随便一搜就这么多 --------------------编程问答-------------------- 处理键盘键入:
http://topic.csdn.net/u/20070815/17/f1c68367-7fe3-42ef-ab8f-00f07525908e.html

处理复制粘贴剪切:
http://topic.csdn.net/u/20070723/17/fcb3dcf0-eb5c-4144-b6e9-bf33fc86097f.html

引用 3 楼 webcan 的回复:

一楼的不要浪费自己和别人的时间，我是楼主，也上网查过资料，但我对更你们有信心！希望你们能在解答问题时多给我启发而已，这才是对问题的应有态度。

既然你上网查过,看来你要加强使用搜索引擎与理解代码的技巧了.

另外,大家和气生财:)

补充：VB ,  基础类