Visual Basic - Extraer datos del DBF

hola, estoy haciendo una aplicacion que busca un folio y me diga el nombre de la persona de ese folio, tengo este cosigo

Dim cn As ADODB.Connection

Private Sub Command1_Click()

Dim strSQL As String
cn.Open "driver={microsoft visual foxpro driver}; sourcetype=DBF; sourcedb=D:X estDATA; exclusive=No; Mode=read;"
Adodc1.RecordSource = "SELECT * FROM cel_data.dbf WHERE folio LIKE '" & Text1.Text & "'"""
end sub

lo que hace este code es que levanta la tabla, y busca el folio pero que comando es para que ke mande el contenido del campo nombre a un text2.text?
tipo
text2.text = ("nombre") o algo asi, o como se hace? gracias, besos

Text2.Text = Adodc1.Recordset!nombre

Text2.Text = Adodc1.Recordset("nombre")

cualquiera de los dos!

y saludos a mi clon, pero de momento no me voy, aunque sé que a algunos les gustaría.