为什么我执行清理数据库一些表中的数据后,再读取数据库中别的表的数据时读不出来

Question

我执行清理数据库一些表中的数据后,也就是系统初始化
再读取数据库中没被初始化的表的数据时,
规格类型表没被清理,但将规格类型表中的数据加到Combo3中,数据没有,可没被清理之前很正常
Adodc1.RecordSource = "select * from 规格类型表 "
Adodc1.Refresh
If Adodc1.Recordset.RecordCount = 0 Then Exit Sub
 For i = 0 To Adodc1.Recordset.RecordCount - 1
 Combo3.AddItem Adodc1.Recordset.Fields(0).Value
 Adodc1.Recordset.MoveNext
  Next
On Error Resume Next

Answer 1

'读取数据库之前先将控件中的数据删除
Combo3.clear    '<----加上这句
Adodc1.RecordSource = "select * from 规格类型表 "
Adodc1.Refresh
If Adodc1.Recordset.RecordCount = 0 Then Exit Sub
 For i = 0 To Adodc1.Recordset.RecordCount - 1
 Combo3.AddItem Adodc1.Recordset.Fields(0).Value
 Adodc1.Recordset.MoveNext
  Next
On Error Resume Next

Answer 2

  对不起,也许我没表达清楚,是这样,我作了个程序,有程序初始化的功能,将有些表内的数据清除,可是清除后发现没被清除的表内数据还在,可是程序再运行时就不能将表内的数据加入到Combo3控件中,很奇怪的事情,我试过将代码放到新建的的程序中很正常,可是清除后又不行了,百思不得其解?怪了,程序应该没问题
  我实在XP中装的SQL2000,是不是跟这个有关系,造成的数据库不稳定吗?还是怎么回事