[VB6] Associare DataField manualmente

[Antagonista]

Salve,
ho una connessione Ado e un campo di testo associato ad un database access.
Normalmente, in modalità visuale, sul campo testo inserisco DataSource:mioado
DataField:nome

All'apertura vedo il nome del db nel rispettivo campo.
Se volessi fare questo a mano, cosa dovrei scrivere?
Grazie 1000

[Massimo Moretti]

Private Sub Form_Load()
Dim Stringa As String
Stringa = "Select * from Tabella 
Set rs = New adodb.Recordset
rs.Open Stringa, "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DataBase.mdb", adOpenKeyset, adLockOptimistic, adCmdText

Txt.Text = rs.Fields("Campo").Value
End Sub

[Antagonista]

grazie.