在数据库中的数据表中添加记录的方法有哪些?如何 *** 作?

用数据库控件实现数据录入/删除

放置控件: Form1:Data1Text1,2Lbel1,2Command1,2,3,4,5Frame1

属性设置:

Data1:〖DatabseName〗="Nwind.mdb",〖Recordsource〗=products

Text1:〖Datasource〗=data1,〖Datafield〗=produtID,〖TabIndex〗=0

Text2:〖Datasource〗=data1,〖Datafield〗=produtName,〖TabIndex〗=1

Command1:〖Name〗=Cmdadd,〖Caption〗=增加

Command2:〖Name〗=Cmddelete,〖Caption〗=删除

Command3:〖Name〗=Cmdexit,〖Caption〗=退出

Command4:〖Name〗=Cmdupdate,〖Caption〗=确定

Command5:〖Name〗=Cmdcancel,〖Caption〗=放弃

Frame1中包含Command4,5

代码:

Option Explicit

Dim firstflag As Boolean '首次使用标记

Private Sub Cmdadd_Click() '增加记录

Data1.Recordset.AddNew

Frame1.Visible = True '使主按钮组不可见

Data1.Caption = "记录:" &Data1.Recordset.RecordCount + 1

Text1.SetFocus

End Sub

Private Sub Cmdcancel_Click() '放弃录入的记录

Data1.Recordset.CancelUpdate

Frame1.Visible = False'使主按钮组可见

Data1.Recordset.MoveLast '回到最后一个记录

End Sub

Private Sub Cmdupdate_Click() '确定录入的记录有效

Data1.Recordset.Update

Frame1.Visible = False'使主按钮组可见

Data1.Recordset.MoveLast '显示录入内容

End Sub

Private Sub Data1_Reposition() '重新定位记录时显示记录号

If firstflag Then '如果是首次使用

Data1.Caption = "" 'data1标题框显示空白

firstflag = False

Else '如果不是首次使用，则在

' data1标题框显示记录号

Data1.Caption = "总记录数:" &Data1.Recordset.RecordCount _

&" 当前记录:" &Data1.Recordset.AbsolutePosition + 1

End If

End Sub

Private Sub Cmddelete_Click()'删除

Data1.Recordset.Delete

Data1.Recordset.MovePrevious '回到前一个记录

End Sub

Private Sub cmdexit_Click()

Unload Me

End Sub

Private Sub Form_Load()

firstflag = True '首次使用

Frame1.Visible = False '使主按钮组可见

End Sub

楼主所说是对的。

记录单的做用就是在数据量很大的表单中插入、编辑或者删除记录（删除记录的任意列都会删除整条记录）。

它的优点在于不用花费大量精力来回切于换各行和列之间，而是使您在一个小窗口中快速完成输入或编辑数据的工作。

具体的 *** 作步骤如下: 单击您“数据清单中”中任一单元格（注：一定要单击数据清单内的单元格），选择"数据"中的"记录单"，将打开一个对话框，其中包含了表单中的所有列的名称。

1.如果需要添加一个新的数据行，您只需单击"新建"按钮，在数据列名后的空白文本框内填入新记录中各列对应的值即可。

2.利用"记录单"还可以利用它在表单中搜索特定的单元格。首先单击"条件"按钮，对话框中所有列数据都将被清空。此时在相应的列名下键入您的查询条件，然后，单击"下一条"按钮或"上一条"按钮来进行查询，这时符合条件的记录将分别出现在该对话框中相应的列的文本框中。这种方法尤其适合于具有多个查询条件的查询中，只要在对话框的多个列文本框中同时输入相应的查询条件即可

3.如果要删除一条记录，只需单击“记录单”中这条记录的任意一条记录然后按“删除”就可以了。

打字不容易希望对楼主有用。

楼上说的部分是对的，但有几点需要指出。如果你的id字段是自增的标识字段的话，它的序号是不可逆的（我说的是自动，当然手动可是实现重新顺序编号），再就是sql200中你不能在两行记录之间再插入一行的（让新插入的记录再原记录之间）。

1、像你说方法在形式上可以达到预想的效果：看上去好像在原来的第2行记录与第3行记录之间“插入”了一条新记录，但是前面的ID列（如果是自增的话）是不会再按1、2、3、4的顺序重新编号的，他是不会自动重新顺序编号的，他会变成1、2、4、5……

2、你的想法是完全没有必要的。对于数据库每条记录之间是完全平等的关系，不管数据库中谁在上谁在下。数据库只是一个存放数据的仓库，如果要向用户展示里面的数据的话是要用视图或者查询的，不会直接取数据表中人为的找的，要是那样也就失去数据库的本质变成了一般的数据文件了。

3、数据库一般都会结合某种应用程序联合应用，起到快速检索用户所需数据的作用，并能实现一定的排序、分组、统计等功能。

综上建议你不要继续你的工作。

---