>404
ConnectionとRecordsetオブジェクトを使わずに
Adodc1のみコードで設定した状態で開きませんか？

Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=C:\VB\練習\Book.mdb;" _
& "Persist Security Info=False"
Adodc1.RecordSource = "本"
Set Me.DataGrid1.DataSource = Adodc1
End Sub