Visual Basic - mover recordset a la fila selec.de un msflexgrid

hola a todos, tengo un problema que lo eh tratado de resolver pero debido a mis limitaciones del msflexgrid me es algo dificultoso, por tal motivo espero me ayuden con lo siguiente:

el caso que deseo que al dar un evento click en msflexgrid en cualquiera de las filas, quiero que el recordset se mueva hacia esta esta ruta msflexgrid.textmatrix(msflexgrid.rowsel, 1)

saludos

Yo lo haria de esta forma usando el evento "MSHFlexGrid1_EnterCell" porque puedes usar las teclas direccionales, al igual que RePág y AvPág, como tambien al hacer click en cualquiera de las filas del Grid, aqui te doy el codigo

Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset
Dim strQuery As String
Dim intRow As Long
Dim i As Integer

Private Sub Form_Load()
Set cnn = Nothing
Set rst = Nothing
Set cnn = New ADODB.Connection
Set rst = New ADODB.Recordset
strQuery = "SELECT IdCliente, NombreCompañía FROM Clientes ORDER BY IdCliente"
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=C:\Archivos de programa\Microsoft Visual Studio\VB98\NWIND.MDB"
cnn.Open
rst.Open strQuery, cnn, adOpenKeyset, adLockOptimistic
Set MSHFlexGrid1.DataSource = rst
For i = 0 To 1
Set txtCampos(i).DataSource = rst
Next
txtCampos(0).DataField = "IdCliente"
txtCampos(1).DataField = "NombreCompañía"
End Sub

Private Sub MSHFlexGrid1_EnterCell()
intRow = MSHFlexGrid1.Row
rst.Move intRow - 1, 1
intRowAnterior = intRow
End Sub

muchas gracias por tu ayuda yendri.. si no fuese mucha molestia, me podrias decir si este codigo que pusistes funciona para MSFLEXGRID o solo para MSHFLEXGRID, solo eso...gracias nuevamente.

Amigo deberias tener mas cuidado cuando preguntas
Utilize MSHFlexgrid por que es Compatible con ADO
Ahora si estas utlizando MSFlexGrid este es Compatible con DAO
pero los dos componentes manejan los mismos eventos