VB中 “实时错误'-2147217887” 和 “编译错误：无效限定符”

 

 

错误一：实时错误'-2147217887（80040e21）'：多步OLE DB操作产生错误。如果可能，请检查每个OLE DB状态值。没有工作被完成。

 

错误：点击调试，显示这行代码：mrc.Fields(5) = Trim(txtTel.Text)有问题。

 

解决方案：考虑到可能是字段大小超出限制、于是将此文本框的MaxLength属性值改为所需要的大小，结果不行。于是回过头看这行代码的意思是将数据库的第六列字段值赋值给文本框txtTel，问题可能出现在数据库字段大小上， 于是在数据库执行修改字段的语句：ALTER TABLE student_Info ALTER COLUMN tele_Number VARCHAR(50) ，这下就成功了。

 

错误二：编译错误：无效限定符

 

点击调试，显示如下：

这里需要注意的是，当代码变黄色，不一定就是本行代码出错，可能错误在这个过程中，在我的耐心比对之下，发现了问题所在，标点符号的错误，实为粗心大意！

Set mrc = ExecuteSQL(txtSQL , MsgText)

 Set mrc = ExecuteSQL(txtSQL . MsgText)