conn.Execute ("insert into xs(xm,xh,xb) values(" & Text1.Text & ",'" & Text2.Text & "','" & Text3.Text & "')")

哪里出了问题啊
提示错误：“在此上下文中不允许出现‘’。此处只允许使用常量，表达式或变量，不允许使用列名！”

conn.Execute ("insert into xs(xm,xh,xb) values('" & Text1.Text & "','" & Text2.Text & "','" & Text3.Text & "')")
这样试试..