求助~~VB向ACCESS中添加数据的问题!

Question

求助~~VB向ACCESS中添加数据的问题!
小弟是想把窗体中的 Text1 ， Combo1，Text2 ，Combo2， Text3 的text添加到表里：
代码如下:Private Sub Command1_Click()
Dim cn As New ADODB.Connection, rs As New ADODB.Recordset
Dim Sql As String
Dim A, B, C, d, E As String
Text1.Text = A
Combo1.Text = B
Text2.Text = C
Combo2.Text = d
Text3.Text = E
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\Program Files\VB98\gongcheng\db8.mdb;Persist Security Info=False"
cn.Open
Dim sSQL As String
Sql = "insert into 爆破员信息录入 (姓名,性别,联系方式,所属单位,家庭住址) value ('" & A & "','" & B & "','" & C & "','" & d & "','" & E & "')"
cn.Execute Sql
Set DataGrid1.DataSource = rs
cn.Close
End Sub
但是提示~~~“insert into 语法错误”
  小第找了半天也没找出何处不对！~~~ 希望各位高手帮帮小弟,,,,

Answer 1

改成
Sql = "insert into 爆破员信息录入 (姓名,性别,联系方式,所属单位,家庭住址) value (" A  ","  B  ","  C  ","  d  ","  E  ")"试试

Answer 2

Dim sSQL As String
是不是多余？
value 改成 values看看。