在你的另一贴里回答了
http://www.csdn.net/expert/topic/803/803214.xml?temp=.6325037

解决方案 »

  1.   

    见你的另一帖!~======================
    如果是通过表单的控件来实现的话,则修改控件的参数(InputMask)!如控制文本控件TEXT为:
    Thisform.text1.InputMask = "9999999"
    ======
    关于属性InputMask的其它参数请参见MSDN吧.常用如下:
    X         可输入任何字符
    9         可输入数据和正负符号,如负号(-)
    #         可输入数字、空格和正负号
    $         显示货币符号
    *         在值的左侧显示*号
    .         小数据点位置
    ,         分隔小数据点左面的部分