Question

Access运行时错误'3134':INSERT INTO语句的语法错误!代码如下!求大神指点!

Dim strSql As String
'为合成INSERT INTO 语句声明一个字符串型变量

strSql = "INSERT INTO Specm(Pcode,Fiber,Scrim,Weight,W%,Tickness,T%,AP,AP%,MDmin,MD%,XDmin,XD%,表面处理,化学处理,热收缩温度,热收缩MD%,热收缩XD%,Mullun,防水等级,长期使用温度,瞬间使用温度,状态,创建人,Tcode,Crdate,Remark) "
strSql = strSql & "VALUES('"

strSql = strSql & [Forms]![新建信息1]![PCode]
strSql = strSql & "','" & [Forms]![新建信息1]![Text2]
strSql = strSql & "','" & [Forms]![新建信息1]![Text3]
strSql = strSql & "','" & [Forms]![新建信息1]![Text4]
strSql = strSql & "','" & [Forms]![新建信息1]![Text137]
strSql = strSql & "','" & [Forms]![新建信息1]![Text6]
strSql = strSql & "','" & [Forms]![新建信息1]![Text139]
strSql = strSql & "','" & [Forms]![新建信息1]![Text8]
strSql = strSql & "','" & [Forms]![新建信息1]![Text141]
strSql = strSql & "','" & [Forms]![新建信息1]![Text9]
strSql = strSql & "','" & [Forms]![新建信息1]![Text104]
strSql = strSql & "','" & [Forms]![新建信息1]![Text10]
strSql = strSql & "','" & [Forms]![新建信息1]![Text103]
strSql = strSql & "','" & [Forms]![新建信息1]![Text5]
strSql = strSql & "','" & [Forms]![新建信息1]![Text7]
strSql = strSql & "','" & [Forms]![新建信息1]![Text13]
strSql = strSql & "','" & [Forms]![新建信息1]![Text111]
strSql = strSql & "','" & [Forms]![新建信息1]![Text110]
strSql = strSql & "','" & [Forms]![新建信息1]![Text113]
strSql = strSql & "','" & [Forms]![新建信息1]![Text126]
strSql = strSql & "','" & [Forms]![新建信息1]![Text121]
strSql = strSql & "','" & [Forms]![新建信息1]![Text123]
strSql = strSql & "','" & [Forms]![新建信息1]![Text119]
strSql = strSql & "','" & [Forms]![新建信息1]![Text129]
strSql = strSql & "',#" & [Forms]![新建信息1]![Text133]
strSql = strSql & "#,'" & [Forms]![新建信息1]![Text134]
strSql = strSql & "')"

DoCmd.RunSQL strSql
'此句代码使用DoCmd对象的RunSql方法运行合成出来的SQL操作查询语句，将窗体未绑定控件中输入的值写入购票信息登记表中。
'弹出提示框，告知插入新纪录成功
MsgBox "信息添加成功", , "Attention"

Answer 1

目测字段列表为27个，字段值列表为26个，两者数目不相符。

请检查缺少引用了哪个窗体文本框中的值？将缺少的那个文本框补上，请留意代码引用窗体控件的顺序不得弄错，必须与字段列表的顺序一致。