<<< 返回 access911.net 编程静态资料库索引页

新手来看:如何解决“对象变量或 With 块变量未设置”错误?

 

作者:cg1  摘自:access911.net  录入:cg1  时间:2005-3-19  浏览人次:1552


专题地址:http://access911.net/fixhtm/72FAB01E11DCE7F3.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:新手来看:如何解决“对象变量或 With 块变量未设置”错误?《VBA》

 


问题:

新手来看:如何解决“对象变量或 With 块变量未设置”错误?
'请引用 ADOX
Dim cat As ADOX.catalog
Dim tbl As ADOX.Table
'错误提示就是下面这行
cat.ActiveConnection = CurrentProject.Connection
For Each tbl In cat.tables
    If Left(tbl.Name, 1) = "C" Then CurrentProject.Connection.Execute "drop table " & tbl.Name
Next


在上述代码中执行到“cat.ActiveConnection = CurrentProject.Connection”这行提示“对象变量或 With 块变量未设置”

 


回答:


上述问题经常出现在编程中,主要是某个需要实例化的变量没有正确实例化。将上述代码更改为
Dim cat As New.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/72FAB01E11DCE7F3.htm

 


上一篇:新手来看:学会总结关键字

下一篇:如何根据组合框的输入,确定另外一个控件的值?

2017年2月22日生成静态资料