Foros del web, para los que viven de bits

espero que puedan ayudarme.

Tengo un formulario llamado PEDIDOS alli tengo un textbox en el cual se pone la clave del cliente y al presionar enter aparecen todos los datos del cliente, cuando el usuario no sabe la clave del cliente presiona un boton para que aparezca el formulario BUSCAR donde tengo un MSHFLEXGRID conectado a una base de datos y lo que quiero es que cuando se de clic en cualquier celda el valor se ponga en el textbox que se encuentra en el formulario PEDIDOS.

Como puedo hacerlo?, Gracias.

Private Sub Form_Load()
MSFlexGrid1.ColWidth(0) = 200
MSFlexGrid1.ColWidth(1) = 3700

For X = 1 To 8
MSFlexGrid1.TextMatrix(X, 1) = X
Next
End Sub


Private Sub MSFlexGrid1_Click()
Text1.Text = MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 1)
End Sub