在用datagrid+access做vb6.0工程时，点击员工信息窗体中datagrid某一行，修改信息窗口激活，在此窗口中修改当前信息，修改完毕，点击保存按钮，但是保存后，却保存在了datagrid的第一行，第一行原来的人员信息没有了。。很郁闷！！想了很久，不知道啥原因。。
代码如下（修改后保存按钮的代码）：
Dim a As Long
If blnAddRY = False Then '修改信息
a = MsgBox("您确定要修改这条信息吗？", vbYesNo, "提示窗口！")
If a = vbYes Then
rs1.Open "select * from 员工信息表 '" + Text1(0).Text + "'", Cnn, adOpenKeyset, adLockOptimistic '打开员工信息表
If rs1.RecordCount > 0 Then
rs1.Fields("编号") = Text1(0)
rs1.Fields("姓名") = Text1(1)
rs1.Fields("性别") = Combo1.Text
rs1.Fields("出生年月") = DTPicker1.Value
rs1.Fields("毕业院校") = Text1(2)
rs1.Fields("文化程度") = Combo2.Text
rs1.Fields("部门") = Combo3.Text
rs1.Fields("岗位") = Text1(3)
rs1.Fields("职务") = Text1(4)
rs1.Fields("职称") = Text1(5)
rs1.Fields("参加工作时间") = DTPicker2.Value
rs1.Fields("备注") = Text1(6)
rs1.Update
End If
rs1.Requery
yg_jbxx.Adodc1.Refresh
yg_jbxx.DataGrid1.Refresh
rs1.Close
End If
以上是代码，请问怎么样保存在原来的行上面。