vb+access 数据

来源：百度知道 编辑：UC知道 时间：2024/05/16 05:29: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" '连接数据库中的xzdw表格
Adodc1.Refresh
For i=1 to 100
Adodc1.recordset.addnew 1,i '添加一个数字 i
adodc1.recordset.movenext '指向下一条
next i