VB 6.0添加新記錄引發錯誤對象變量或未設置塊

Question

我想在表單加載事件的數據庫中添加一條新記錄 - 也就是說，只要我的表單加載文本框就會變爲空白，將使用戶能夠輸入將被添加到數據庫的信息。 當我的代碼然而，這，：

Private Sub Form_Load() 
Data1.Recordset.AddNew 
End Sub 

我不斷收到一個錯誤：

run-time error '91'; object variable or With block not set. what should I do?

Answer 1

地方你的代碼Form_Initialize（）

Private Sub Form_Initialize() 
Data1.Recordset.AddNew 
End Sub 

Answer 2

我想;你需要改變它的東西是這樣的：

Private Sub Form_Load() 
    Dim rs As ADODB.Recordset 
    Set rs = Data1.Recordset 

    rs.AddNew 
    rs!Column1 = 1 
    rs!Column2 = "test 
    rs.Update 

End Sub 

現在，如果有錯誤訊息，Set rs = Data1.Recordset那麼我們需要知道什麼是Data1。

Answer 3

只需在addnew之前加上adodc1.refresh即可。它會解決它。