首先,右键单击Msflexgrid,选择属性,打开属性页,然后在通用里面,把焦点区改成0 - None,选定模式改为1 - By Row,如图:
这样你单击某个单元格,就会选中这一整行,而且选中的单元格不会有焦点框,不影响美观
然后,在Msflexgrid的Click事件里添加代码:
'假设Msflexgrid的名字叫msGrid
msGrid.BackColorSel = vbBlue'把选中行的背景色改成蓝色
就行了
效果图: