实时错误'91',大虾们救命啊

Question

我的代码如下:
Private Sub Form_Load()  Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
                                App.Path & "\pay.mdb;Persist Security Info=False"
   
     Adodc1.RecordSource = "select * from loaduser"       Adodc1.Recordset.MoveFirstEnd sub运行时弹出:
    实时错误'91'
       对象变量或With块变量未设置我以前编程时也是这样写的,不懂现在为什么会运行不到了.
大虾们请指点一二,谢谢了.

Answer 1

缺少：Adodc1.Refresh
Private Sub Form_Load()     Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
                                App.Path & "\pay.mdb;Persist Security Info=False"
   
     Adodc1.RecordSource = "select * from loaduser"     Adodc1.Refresh     Adodc1.Recordset.MoveFirstEnd sub