用vb向数据库添加数据的问题，高手请指导！
用vb向数据库添加数据，编码是自动编码，添加后在数据库把数据删除了，可是再继续添加数据，编码是按删除前的编码往后计数的，请问怎样解决这个问题？
部分代码：
Private Sub Command1_Click()
'On Error Resume Next
'MsgBox Form1.Data1.Recordset.RecordCount
Form1.Data1.Recordset.AddNew
Form1.Data1.Recordset.Fields(1) = Form2.Text1.Text
Form1.Data1.Recordset.Fields(2) = Form2.Text2.Text
Form1.Data1.Recordset.Fields(3) = Form2.Text3.Text
Form1.Data1.Recordset.Fields(4) = Form2.Text4.Text
Form1.Data1.Recordset.Update
If Err.Number <> 0 Then
Beep
MsgBox "输入数据错误，请重新输入", vbCritical + vbOKOnly, "错误信息"
Exit Sub
Else
Form1.Data1.Recordset.Bookmark = Form1.Data1.Recordset.LastModified
End If
Form1.Enabled = True
Unload Form2
End Sub
Form1.Data1.Recordset.Fields(1) = Form2.Text1.Text 是不是自动编号的字段，如果是，就不用写这个了。
不是，编码是第0个数据
如果字段是自动递增的标识列，则确实是这样的，即使在数据库中删除记录再增行也是不连续的
那怎样才能改善这�
相关问答：
我有厂家做的ASP的监控录像（DVR）的局域网播放的源程序与控件，想要用ASP.net做一个视频回放的程序（利用他的控件）但不知如下去做，望各位指点。
先搞清楚他们的控件是怎么用的,
然后就直接用好了.
不过,如 ......
用VB怎么只针对windows自带的文件的右键添加菜单 如（.txt .doc)
这个是只针对以这两个为扩展名的文件操作
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[随便起名]\command]
@= ......
在vb中怎么判断，插入到数据库中的值是重复的，本人才刚接触VB语言，甚是有好多地方还不懂，还请各位大侠们给出代码，谢谢了呀！！！
插入之前select一下阿。
或者写一个组合SQL插入语句，例如
IF not Exist(
& ......
我是VB的新成员，现在想用VB来做个TXT文档，请大家给我代码及介绍一下相应的控件！
非常感谢！！！！！！
可以用一些OFFICE控件
google上找一下吧,VB写入TXT,很多样例代码的
直接调查用就可以了
面对美女 ......
第一次接触CrystalReport
急寻找Vb.net Access 通过查询出的数据输出到CrystalReport的例子.
有的朋友麻烦发来学习.多谢!
跟你的要求差不多，参考一下：
http://topic.csdn.net/u/20090823/21/87af02d3-f4ca-480 ......
