VB 版 (精华区)

 以下程序可以实现限定文本框只能输入数字：
        Sub Text1_KeyPress (keyascii As Integer)
        If keyascii < 48 Or keyascii > 57 Then
        Beep
        Beep
        johny@nease.net
        keyascii = 0
        End If
        End Sub
    若想限定文本框输入格式，可以使用VB的FORMAT函数，也可以使用专业版的屏
蔽控
件(Masked Edit)，通过设定屏蔽控件的Mask属性可以对文本框的输入格式作精确
控制。