order是SQL的保留字,说得通俗一点就是order是SQL本身的命令词(其他的像select、from、where等等也是),所以一般是不能用作表名或字段名的,因为会造成系统产生歧义(就是说电脑分不清是表名还是命令词了)。
如果一定要用也不是不可以,但是必须加上方括号,即:
strtemp = "select * from [order] where cusnam='" & Text1(0).Text & "'"
此外,要把所有rs2改为rs3,这么低级的错误你也会犯啊?
可能因为order是保留字吧,把这个表名改为其他名字试试
另外For i = 1 To rs2.RecordCount 循环中是不是应改为rs3。