vb+access 如何加入一个递增的数列

来源：百度知道 编辑：UC知道 时间：2024/05/30 00:56:48
用vb 如何向一个access数据库 中的某一个表xzdw 中 加入一个递增的数列1 ，2 ，3 ，4.。。。。。

首先用 Adodc 连接数据库
工程-----部件----- 把 Microsoft ADO Data Control 选上
把 ADODC 控件添加到窗口中
在 ADODC 控件上右键---属性---使用连接字符串----生成----
Microsoft Jet 4.0 OLE ----- 填上数据库地址
然后在Command1 按钮 事件下写代码：

Adodc1.RecordSource="Select * from xzdw"
Adodc1.Refresh
For i=1 to 100
Adodc1.recordset.addnew 1,i
adodc1.recordset.movenext
next i