缺少语句结束

不能只用“_”，改写如下：
strSQL1 = " select 装机号,机主姓名,单位,地址,电话,总金额,配置时间,提货方式,装机配置.CPU品牌" & _
", 装机配置.CPU型号,CPU.单价 as CPU单价,CPU.保修期 as CPU保修期,CPU数量 from 装机配置,CPU where 装机配置.CPU品牌=CPU.品牌 and 装机配置.CPU型号=CPU.型号 "

"_"符号的分行功能是把VB的关键词分多行写。但不能把“”内部的字符串分多行写。要把一个长的字符串分多行。可以分为多个字符串，再用& _ 来连接多行。如：

strSQL1="select * " & _
"from 装机配置" & _
"where......."

vb中如果代码要换行，那么用空格加下划线，但是如果是字符串赋值，那么要用“&”连起来。
应该是
strSQL1 = " select 装机号,机主姓名,单位,地址,电话,总金额,配置时间,提货方式,装机配置.CPU品牌 " & _
", 装机配置.CPU型号,CPU.单价 as CPU单价,CPU.保修期 as CPU保修期,CPU数量 from 装机配置,CPU where 装机配置.CPU品牌=CPU.品牌 and 装机配置.CPU型号=CPU.型号 "

拿分走人