rs.Open "select * from 学生基本信息表", conn, 1, 3
conn.Execute("update 学生基本信息表 set rs("student_id")=" & trim(txtbh.Text) & ",rs("student_xm")='"& trim(txtxsxm.Text) &" '_
rs("student_xb")='"& trim(txtxb.text) &"',rs("student_sr")='"& trim(txtcsrq.Text) &"',rs("student_jg")='"&&trim(txtjg.Text)"'_
rs("student_mz")='"& trim(txtmz.Text) &"',rs("student_sfzh")='"& trim(txtsfzh.text) &"',rs("student_zw")='"& trim(txtzw.text) &"'_
rs("student_jzdz")='"& trim(txtjzd) &"',rs("student_xszh")='"& trim(txtxszh.text) &"',rs("student_yzbm")='"&trim(txtyzbm.text)&"'_
rs("student_dh")='"& trim(txtdh.text) &"',rs("student_bz")='"& trim(txtbz.text) &"')"
MsgBox "数据修改成功!", vbInformation, "mdfy"
End Sub

帮忙看看这样写有什么样问题啊 ?\
系统总是提示一些不知所措的问题?

msgbox一下这句update语句...自己看看有什么错误..