我试了以下代码,可以绑定的
Dim cnn As New ADODB.connection
Dim rs As New ADODB.RecordsetPrivate Sub Form_Load()
  cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\temp\mydb.mdb"
  rs.Open "select 课程号,课程名称,学时 from course", cnn, adOpenKeyset, adLockOptimistic
  Set Text1.DataSource = rs
  Text1.DataField = "课程号"
End Sub
你检查以下记录集rs中有没有记录