Prueba con esto:
Private Sub Form_Load()
Me.Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Archivos de programa\Microsoft Visual Studio\VB98\BIBLIO.MDB;Persist Security Info=False"
Me.Adodc1.CommandType = adCmdText
Me.Adodc1.RecordSource = "Select * From Authors"
Set Me.Text1.DataSource = Adodc1
Me.Text1.DataField = "Au_ID"
End Sub