Como hacer una busqueda en un formulario con msgflexgrid

[osrohe]

Puedes realizar una busqueda en el msflexgrid una vez que localizas el registro en el evento doble click del msfexgrid puedes almacenar la decula en una variable cargar el segundo formulario y asiganar el valor de la variable a una caja de texto o donde desea presentarla. la busqueda hazla de un caja de texo en este caso yo uso txtbuscar. declara una variable que guarde la posicion de la fila.
dim fila as integer

Private Sub txtbuscar_Change()
Dim Pos As Integer, i As Integer

With MSFEMPLEADOS
.Col = 2
For i = 1 To .Rows - 1
.Row = i
Pos = InStr(UCase(.Text), UCase(txtbuscar.Text))
If Pos = 1 Then
.ColSel = 21
.TopRow = 1
Exit For
End If
Next i
End With
End Sub

Una vez que localizas el registro le dices.
fila=msfempleados la posicion de la fila que tiene el registro, luego le dices la colulmna.

variable=textmatrix(fila,1)

Private Sub MSFEMPLEADOS_DblClick()
frmdos.txtcedula.text=variable
End Sub

Espero te funciones.