关于vb中的SQL语句

[qwegis]

iflag = 0
insert_eyeinfo = "insert into Eyeinfomation(personID,farRqiujing,farRyuanzhujing,farRyuanzhuzhou,farRsanlengjing,farRbeikao,farLqiujing,farLyuanzhujing,farLyuanzhuzhou,farLsanlengjing,farLbeikao,nearRqiujing,nearRyuanzhujing,nearRyuanzhuzhou,nearRsanlengjing,nearRbeikao,nearLqiujing,nearLyuanzhujing,nearLyuanzhuzhou,nearLsanlengjing,nearLbeikao,doctorID,yizhu,flag) values ('" & CInt(Trim(txt_Personbm.Text)) & "','" & Trim(txt_farRqiujing.Text) & "','" & Trim(txt_farRyuanzhujing.Text) & "','" & Trim(txt_farRyuanzhuzhou.Text) & "','" & Trim(txt_farRsanlengjing.Text) & "','" & Trim(txt_farRbeikao) & "','" & Trim(txt_farLqiujing.Text) & "','" & Trim(txt_farLyuanzhujing.Text) & "','" & Trim(txt_farLyuanzhuzhou.Text) & "','" & Trim(txt_farLsanlengjing.Text) & "','" & Trim(txt_farLbeikao.Text) & "','" & Trim(txt_nearRqiujing.Text) & "','" & Trim(txt_nearRqiujing.Text) & "','" & Trim(txt_nearRyuanzhujing.Text) & "','" & Trim(txt_nearRyuanzhuzhou.Text) & "','"""
insert_eyeinfo = insert_eyeinfo & Trim(txt_nearRsanlengjing.Text) & "',"
insert_eyeinfo = insert_eyeinfo & Trim(txt_nearRbeikao.Text) & "',"
insert_eyeinfo = insert_eyeinfo & Trim(txt_nearLqiujing.Text) & "',"
insert_eyeinfo = insert_eyeinfo & Trim(txt_nearLyuanzhujing.Text) & "',"
insert_eyeinfo = insert_eyeinfo & Trim(txt_nearLyuanzhuzhou.Text) & "',"
insert_eyeinfo = insert_eyeinfo & Trim(txt_nearLsanlengjing.Text) & "',"
insert_eyeinfo = insert_eyeinfo & Trim(txt_nearLbeikao) & "',"
insert_eyeinfo = insert_eyeinfo & Trim(txt_doctorID.Text) & "',"
insert_eyeinfo = insert_eyeinfo & Trim(txt_yizhu.Text) & "',"
insert_eyeinfo = insert_eyeinfo & iflag
insert_eyeinfo = insert_eyeinfo & ")"
Set rs_insert_eyeinfo = TransactSQL(insert_eyeinfo)



期中的iflag是int型变量

执行的时候会提示有SQL语法错误 想问问各位大神 上面的SQL语句哪里有错误啊

[Tiger_Zhao]

加上调试输出语句，然后将SQL复制到SQL Server 中分析。

Debug.Print insert_eyeinfo

[饮水需思源]

sql=" insert into 表名(字符型字段,日期型字段,数值型字段) values('"& 字符型变量 &"','"& 日期型变量 &"',"& 数值型变量 &")"