la verdad es q no se si lo q preguntas se puede hacer, pero lo que se me ocurre q hagas es guardar el recorset.campo seleccionado en una variable y luego al textbox le asignas la var.
lo que volcas al text es el valor del registro del recordset en el que te posicionas mediante el evento click o doble click segun vos quieras. ej private sub datagrid1_dblclick on error goto AE text1.text=rs("NombreCampo").value exit sub AE: msgbox Errr.description end sub