第一次用vb！急救！请程序员们帮忙！

Question

好象没有简单的办法,要用API吧.
附注:我只知道COMBOBOX 和 LISTBOX中可以用API函数; SENDMESSAGE 来实现这样的效果.

Answer 1

用MOUSEMOVE好象有点困难，MARK一下

Answer 2

MSHFlexGrid单击某条纪录时，记录当前单元所在行列
dim iCurrRow,iCurrCol as integer
iCurrRow=mshflexgrid1.row
iCurrCol=mshflexgrid1.col
某一行高亮显示
    Dim i As Integer
    MSHFlexGrid1.Row = iCurrRow
    For i = 0 To MSHFlexGrid1.Cols - 1
        MSHFlexGrid1.Col = i
        MSHFlexGrid1.CellBackColor = vbCyan
    Next
离开某一行重置背景色
    Dim i As Integer
    MSHFlexGrid1.Row = iCurrRow
    For i = 0 To MSHFlexGrid1.Cols - 1
        MSHFlexGrid1.Col = i
        MSHFlexGrid1.CellBackColor = vbwhite
    Next