您的位置：程序门 -> vb -> 控件

单击msflexgrid，高亮选中行，并取得单元格的col和row

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

单击msflexgrid，高亮选中行，并取得单元格的col和row[已结贴,结贴人:lyd963]

发表于：2007-11-21 22:46:49 楼主

msflexgrid的属性selectionmode为1时，不能取到当前单击的单元格的col和row，为0时可以取到正确的值，但是单击时却无法高亮显示选中的行。
我两个效果都要，请问有什么办法吗`？

发表于：2007-11-21 23:45:351楼得分:15

private sub msflexgrid1_click（)
with msflexgrid1
msgbox .mousecol & " " & .mouserow
end with

end sub

发表于：2007-11-22 06:51:022楼得分:5

private sub hflexgrid_entercell（)
'单击某一单元时，改变该行颜色
dim i_col as integer
dim c_col as integer
c_col = hflexgrid.col
if c_col > 0 then
for i_col = 0 to hflexgrid.cols - 1
hflexgrid.col = i_col
hflexgrid.cellbackcolor = &hf47859
next i_col
hflexgrid.col = c_col
end if
end sub

private sub hflexgrid_leavecell（)
'当某一行失去焦点时，改变该行颜色
dim i_col as integer
dim c_col as integer
c_col = hflexgrid.col
for i_col = 0 to hflexgrid.cols - 1
hflexgrid.col = i_col
hflexgrid.cellbackcolor = vbwhite
next i_col
hflexgrid.col = c_col
end sub

发表于：2007-11-22 09:11:313楼得分:0

leftie
你的代码是死循环。

发表于：2007-11-22 09:33:464楼得分:0

to:clear_zero
当msflexgrid的属性selectionmode为1时，mousecol总是1/mouserow则会随着单击的行数不一样而改变值。

发表于：2007-11-22 09:45:135楼得分:0

呃是我错了。

发表于：2007-11-23 09:39:096楼得分:0

-_-

下一篇：windows.forms.datagridview控件绑定后数据不能显示？？问题在哪里？
上一篇：窗体内控件大小随窗体变化而变化。

其他资讯