实时错误91，“对象变量或with变量未设置”是怎么回事？

这是我的添加窗口的代码
Private Sub Command1_Click()
Dim mrc As ADODB.Recordset
Dim txtsql As String
Dim msgtext As String
If Trim(Text1.Text) = "" Then
MsgBox "请输入图书编号", vbOKOnly, "警告"
Text1.SetFocus
Exit Sub
End If
If Text2.Text = "" Then
MsgBox "请输入书名", vbOKOnly, "警告"
Text2.SetFocus
Exit Sub
End If
If Text3.Text = "" Then
MsgBox "请输入作者", vbOKOnly, "警告"
Text3.SetFocus
Exit Sub
End If
If Text4.Text = "" Then
MsgBox "请输入出版社", vbOKOnly, "警告"
Text4.SetFocus
Exit Sub
End If
If Text5.Text = "" Then
MsgBox "请输入出版日期", vbOKOnly, "警告"
Text5.SetFocus
Exit Sub
End If
If Combo1.Text = "" Then
MsgBox "请选择类别", vbOKOnly, "警告"
C

为什么 实时错误'91': 对象变量或With块变量未设置 实时错误'91'对象变量或with块变量未设置(在线等) vb 实时错误‘91’对象变量或 With 块变量没有设置 我运行VB程序时出现实时错误‘91’ 对象变量或with块变量未设置 VB中对象变量或with块变量错误（91号错误） 无法创建VFP评分对象，错误=[未设置对象变量或 With block 变量]？ 实时错误 424 要求对象 notes 实时错误 424 要求对象 是怎么回事？ vb中 实时错误 对象名无效 vb 实时错误91