Simone
这种情况几轿枣乎可以肯定是sql语句有问题你可以这样来进行测试以发现sql的问题：dim str1 as string str1="select a as 项目,b as 营业费宴岩用,c as 管理费用,d as 税项,e as 财务费用,f as 摊折费用,g as 其他费用,h as 营业准备 from report4 where zth='01'and rid='1.3.1'and kjq='" & Label2.Caption & " '"Adodc1.RecordSource =str1之后在Adodc1.RecordSource =str1句上打上断点闭祥拆，让程序运行到这里，右击str1，监视其内容，把其内容（就是SQL语句）拷到你的你数据库中运行一下，此时数据库会提示语句中的错误，修改，直到运行通过，再在程序中做相应修改。
