1.捕捉Enter和箭头键的按键事件。用keypress事件2.控制msflexgrid中某一列全部输入为数字,也就是控制textbox中的输入为数字。

解决方案 »

  1.   

    1、在text控件内捕捉Enter和箭头键的按键事件。你最好把他写成公用函数,方便使用。
    2、点击需判断的列后,判断ISNUMERIC(TEXT。TEXT).
      

  2.   

    使用vsflexgrid你就不会这么痛苦了
      

  3.   

    如果用捕捉头键的按键事件,那为什么不一开始就用keypress捕捉事件,将值直接输入到msflexgrid中呢?!
      

  4.   

    2.当textbox失去焦点时判断输入的值是否为数值型
    private sub textbox_lostfocus
        if textbox.text<>"" then
           if not isnumeric(textbox.text) then
               msgbox "请输入数值型数据!",48,"提示"
               textbox.setfocus
           endif
        endif
    end sub
      

  5.   


    数字的判断使用isnumeric不是很好因为当你输入逗号的时候好像无法识别
    最好使用textbox的change事件中asscii码来判断是不是数字这样并不复杂而且很准确不会有非数字量的输入不会出错