highlight a particular row in MSHFlexGrid

I am very much new in VB 6.0 programmig.
Can someone guide me how to highlight a particular row (entire row).
I am using ADO in my program, and database is in ACCESS 2000.
After clicking command buttons I can navigate thorough my recordset to and fro.
I want to highlight the Particular row at which my recordset is at present and also the highligted row come to be in visible height of the MSHFlexGrid so that users do not have scroll up and down for the visualization of highlighted recordset.

hi
here is code for u.

VB Code:

Private Sub MSH_Click()
    Dim R As Integer
    R = MSH.Row
    For J = 1 To MSH.Rows - 1
        For I = 0 To MSH.Cols - 1
            MSH.Row = J
            MSH.Col = I
            MSH.CellFontBold = False
            MSH.RowHeight(J) = 240
            MSH.CellForeColor = vbBlack
        Next I
    Next J
    For I = 0 To MSH.Cols - 1
        MSH.Row = R
        MSH.Col = I
        MSH.CellFontBold = True
        MSH.CellForeColor = vbRed
    Next
    MSH.RowHeight(R) = MSH.RowHeight(R) + 100
End Sub

:D