在msflexgrid控件中每一个cell格的内容是不可以由用户直接编辑的但是我们可以通过一些小技
巧来方便的实现这编辑功能来扩展msflexgrid的应用（在实际应用中这是很常用的功能）。

    你只需按下面的做即可轻松实现编辑msflexgrid控件数据的功能

    例在窗体上放一文本框text1，和一msflexgrid控件flexgrid1
加入下例代码


private sub form_load()
    text1.move -10000, -10000, 1, 1
end sub

private sub msflexgrid1_entercell()
    msflexgrid1.cellbackcolor = vbblue
    msflexgrid1.cellforecolor = vbwhite
    text1.text = msflexgrid1.text
    text1.selstart = 0
    text1.sellength = len(text1.text)
end sub

private sub msflexgrid1_leavecell()
    msflexgrid1.cellbackcolor = vbwhite
    msflexgrid1.cellforecolor = vbblue
end sub

private sub msflexgrid1_mousedown(button as integer, shift as integer, x as single, y as single)
    text1.setfocus
end sub

private sub text1_change()
    msflexgrid1.text = text1.text
end sub

private sub text1_keydown(keycode as integer, shift as integer)
    select case keycode
        case vbkeyleft, vbkeyright, vbkeyup, vbkeydown
            keycode = 0
    end select
end sub


    ok,这样一个可编辑的msflexgrid控件就完成了，简单吧!!

http://ngsoft.shangdu.net