update 语法错误，原因何在？

在access中创建了一个增加人员信息的窗体，录入内容后点击新增，单击新增的语句如下，但报“语法错误”。高亮显示在“ rs("联系电话") = 联系电话  rs.Update”这里，麻烦大神帮看看。

Private Sub 添加记录_Click()

Dim rs As New ADODB.Recordset
  rs.Open "退休信息", CurrentProject.Connection, adOpenDynamic, adLockOptimistic
  rs.AddNew
rs("个人编号") = 个人编号
  rs("姓名") = 姓名
  rs("性别") = 性别
  rs("出生日期") = 出生日期
  rs("单位ID") = 单位ID
  rs("退休时职务") = 退休时职务
  rs("身份证号") = 身份证号
  rs("参加工作时间") = 参加工作时间
  rs("是否有企业就业经历") = 是否有企业就业经历
  rs("开户银行") = 开户银行
  rs("户名") = 户名
  rs("账号") = 账号
  rs("联系电话") = 联系电话  rs.Update
  rs.Clone
  Set rs = Nothing
  MsgBox "新增退休人员成功！"
End Sub