用VB给数据库添加记录时为什么原来的记录数保持不变而原来的数据内容在一个个的减少，既是当原来的数据是10个，当用VB给它添加1个时，表里面显示的还是10个，只是原来的第一个数据被我新加入的数据替换了
这是为什么？
请解答
谢谢！

应该是你写的添加语句写错了吧?看看你是怎么写的呢?

Private Sub Command1_Click()
Data1.UpdateRecord
If Data1.Recordset.RecordCount <> 0 Then
Data1.Recordset.MoveLast
yy = Data1.Recordset.Fields("studentnum")
End If
Data1.Recordset.AddNew
Text1(1).SetFocus
Text1(1).SelStart = Len(Text1(1))
MsgBox "信息添加成功!", vbOKOnly, "提示"

End Sub