Question

vb access 出现 未找到方法或数据成员

Private Sub wclass_Click()
Adodc1.RecordSource = "班级"
Adodc1.Refresh
添加班级.Show
End Sub
Private Sub wcollege_Click()
Adodc1.RecordSource = "学院"
Adodc1.Refresh
添加学院.Show
End Sub
Private Sub wcourse_Click()
Adodc1.RecordSource = "课程"
Adodc1.Refresh
添加课程.Show
End Sub
Private Sub wdept_Click()
Adodc1.RecordSource = "系"
Adodc1.Refresh
添加系.Show
在菜单点那个都会出现未找到方法或数据来源
可能是哪里的错误 急求

Answer 1

类似下面的连接字符串赋值式是否存在？

    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\BIBLIO.MDB;Persist Security Info=False"