Question

VB中经常会出现错误提示：实时错误91，对象变量或With变量未设置，这是什么错误，该怎么改正？请大侠讲解

Private Sub Command1_Click()
Data1.Recordset.AddNew
Image1.Picture = LoadPicture(GetAppPath() & Data1.Recordset.Fields("图片路径"))
Text1.SetFocus
End Sub

卡在
Data1.Recordset.AddNew

是不是要设置Data1控件，要怎么设置？

Answer 1

这个错误说明你的数据库未正常连接.用断点调试下看看连接那一块是哪里出现了问题.连接以后才能在记录集里addnew呀,还有,看看是不是在addnew以后需要update一下呢.

Answer 2

使用DATA控件？
你需要先关联数据库，这样DATA控件包含的 Recorset 对象才能正确初始化，然后才能正常添加记录（AddNew），不然你添加数据是要往哪里添加呢？
设置DATA控件的 Database属性（数据库文件）和 RecordSource属性（表名称）

追问

这些我都已经设置了

追答

是否设置成功了？关键是成功连接上数据库，DATA.Recordset 对象才能初始化

Answer 3

data1.Recordset没有正常打开。

追问

怎么打开啊？

Answer 4

data1 对象没有 创建 要 new 一下啦。

追问

怎么创建啊？