贼急！！！！！！！！

[qxh0724]

如何控制网格控件（包括各种网格控件）中加亮显示所指定的某一行记录？？！？！？！？急啊！各位兄弟，分不够再加~！！！1

[饮水需思源]

'试试这个：
Private Sub hflexgrid_EnterCell()

If Hflexgrid.Row = 0 Then Exit Sub
'将当前行改变颜色
Dim i As Integer
Dim iCol As Integer
iCol = Hflexgrid.Col
For i = 1 To Hflexgrid.Cols
Hflexgrid.Col = i - 1
Hflexgrid.CellBackColor = &HFFFFC0
Next i
Hflexgrid.Col = iCol

End Sub

Private Sub hflexgrid_LeaveCell()

If Hflexgrid.Row = 0 Then Exit Sub
'将当前行改变颜色
Dim i As Integer
Dim iCol As Integer
iCol = Hflexgrid.Col
For i = 1 To Hflexgrid.Cols
Hflexgrid.Col = i - 1
Hflexgrid.CellBackColor = vbWhite
Next i
Hflexgrid.Col = iCol

End Sub