专家坐堂-insert into错误Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

-- insert into错误

Dim hh,xm,gx,cym,xb,csd,mz,jg,dz,xy,sfh,sg,xx,wh,hk,by,fw,zy,hd,hs,qz,lx,jm,jg1 As String

Dim csrq,djrq,qvrq,yxrq As Date

Dim zp As Image

hh=e.Form.Controls("textbox1").text

xm=e.Form.Controls("textbox5").text

sfh=e.Form.Controls("textbox6").text

gx=e.Form.Controls("combobox1").text

cym=e.Form.Controls("textbox7").text

xb=e.Form.Controls("textbox8").text

csd=e.Form.Controls("textbox9").text

mz=e.Form.Controls("combobox2").text

gx=e.Form.Controls("textbox01").text

csrq=e.Form.Controls("datetimepicker1").text

dz=e.Form.Controls("textbox03").text

xy=e.Form.Controls("combobox4").text

sg=e.Form.Controls("textbox02").text

xx=e.Form.Controls("textbox3").text

wh=e.Form.Controls("combobox5").text

hk=e.Form.Controls("combobox6").text

by=e.Form.Controls("combobox7").text

fw=e.Form.Controls("textbox10").text

zy=e.Form.Controls("textbox12").text

hd=e.Form.Controls("textbox06").text

hs=e.Form.Controls("textbox07").text

Dim cmd As New SQLCommand

cmd.C

cmd.CommandText = "Insert Into hkxx (户号,姓名,身份证号,户主与户主关系,曾用名,性别,出生地,民族,籍贯,出生日期,本市其他地址,宗教信仰,身高,血型,文化程度,婚姻状况,兵役状况,服务处所,职业,何时由何地迁来本市/县,何时由何地迁来本址,承办签章) values (\'" & hh & "\',\'" & xm & "\',\'" & sfh & "\',\'" & gx & "\',\'" & cym & "\',\'" & xb & "\',\'" & csd & "\',\'" & mz & "\',\'" & jg & "\',\'" & cdate(csrq) & "\',\'" & dz & "\',\'" & xy & "\',\'" & sg & "\',\'" & xx & "\',\'" & wh & "\',\'" & hk & "\',\'" & by & "\',\'" & fw & "\',\'" & zy & "\',\'" & hd & "\',\'" & hs & "\')"

cmd.ExecuteNonQuery()

我执行这段代码时，总出错，insert into 错误，请指教