Question

vb6.0中实时错误91 对象变量或with块变量未设置！！！

添加代码
Private Sub Command1_Click()
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("商品名称") = Trim(Text1)
Adodc1.Recordset.Fields("供货商号") = Trim(Text2)
Adodc1.Recordset.Fields("进货日趋") = Trim(Text3)
Adodc1.Recordset.Fields("商品编号") = Trim(Text4)
Adodc1.Recordset.Fields("验货员") = Trim(Text5)
Adodc1.Recordset.Fields("进货价") = Trim(Text6)
Adodc1.Recordset.Fields("数量") = Trim(Text7)
Adodc1.Recordset.Fields("金额") = Trim(Text8)
Adodc1.Recordset.Update
MsgBox ("添加成功")
End Sub

Answer 1

确定Adodc1控件已经连接到数据表了？

追问

连接了是不是触发器的问题啊

追答

需要在最前面加上语句
Adodc1.Refresh

另外，文本框里值的长度不能超过字段程度

Answer 2

到昨天你已经帮助了586位网友，
相当于伦敦奥运会中国代表团的总人数
忒假了吧

追问

什么啊我去

追答

被度娘坑了 发错了