添加记录时出现的问题，请帮忙！

Question

我把文本text的控件和adodc绑定了，用datagrid显示，
Private Sub cmdAdd_Click()
  On Error GoTo AddErr
  datPrimaryRS.Recordset.AddNew  Exit Sub
AddErr:
  MsgBox Err.Description
End Sub现在问题是，按添加按钮后，添加一条记录，覆盖了第一条，继续添加就不会覆盖了，请问这是什么原因？谢谢！

Answer 1

Private Sub cmdAdd_Click()
  On Error GoTo AddErr
  datPrimaryRS.Recordset.AddNew
  datPrimaryRS.Recordset.update  '加上這句
 ' Exit Sub  去掉這句
AddErr:
  MsgBox Err.Description
End Sub

Answer 2

更新也不行啊，我看见窗口打开的时候，datagrid的记录指针指向第一行，所以添加时就会覆盖第一行，然后指针跳到最后一个空记录上，添加就没有问题了，请问如何在第一次添加之前就让它指向一个空记录呢，是不是这样就不会覆盖以前的记录了？谢谢！

Answer 3

Private Sub cmdAdd_Click()
  On Error GoTo AddErr
  datPrimaryRS.Recordset.AddNew
  datPrimaryRS.Recordset.update  
 Exit Sub  
AddErr:
  MsgBox Err.Description
End Sub
这样也不行
Private Sub cmdAdd_Click()
  On Error GoTo AddErr
  datPrimaryRS.Recordset.update   datPrimaryRS.Recordset.AddNew
   Exit Sub  AddErr:
  MsgBox Err.Description
End Sub
这样也不行Private Sub cmdAdd_Click()
  On Error GoTo AddErr
  datPrimaryRS.Recordset.AddNew
  datPrimaryRS.recordset.movelast
'a 
 Exit Sub  
AddErr:
  MsgBox Err.Description
End Sub
也不行