请教：在表中增加自动编号字段？

Alshift　发表于：2010-12-29 21:59:36 　

复制

请教各位高手：

现在小弟碰到一个问题，用生成表查询做了一个表，例子中的表“现在的状况”。

再用到时需要在表中增加一个字段：ID，类型是自动编号。由于每天都要几次更新数据，手动增加很不方便。

现在请教各位：有没有其他的方法，例如用宏或代码等方法，自动添加这个字段，在窗体设置一个命令按钮，双击命令按钮就可以增加这个字段；

最后的结果在例子中也有说明，谢谢。

请各位多多帮助，谢谢。

点击下载此附件

Top

煮江品茶发表于：2010-12-30 09:19:19

请参见《看不见的美观》一文。

Top

Alshift 发表于：2010-12-30 12:33:00

谢谢斑竹的解答。

不过您介绍的例子中，是已经有一个字段用来排序，如果不连续的话进行整理变成连续的。

我的问题是，表里根本就没有这样的字段，如何创造一个这样的字段，字段的数据类型是“自动编号”，谢谢。

Top

煮江品茶发表于：2010-12-30 17:34:20

呵呵，看来你没有看懂。用这个函数吧：

Sub 自动编号(tbname As String, MyID As String)

'功能：新增自动编号

'参数：tbname--表名称, MyID--自动编号字段的名称

'示例：call 自动编号("学生表","学生ID")
Dim strsql As String
strsql = "ALTER TABLE " & tbname & " ADD COLUMN " & MyID & " Counter"
CurrentDb.Execute strsql
End Sub

Top

Alshift 发表于：2010-12-30 20:11:38

谢谢斑竹煮江品茶的解答。

小弟刚刚接触access，对代码还不熟悉，虽然您告知我这个代码，但我还是不知道该怎么去运用。

您能否把代码直接放在我的例子中呢，谢谢。

Top

Alshift 发表于：2010-12-30 20:31:34

我试了你的代码，我不知道放在哪？

是模板里还是窗体的VB视图里？

谢谢。

Top

无情发表于：2010-12-31 14:48:15

按钮的单击事件中，输入“call 自动编号”即可

Top

Alshift 发表于：2010-12-31 22:06:19

谢谢两位的解答，已经搞定。

再次感谢。

Top

总记录：7篇页次：1/1 9 1 :

Access交流中心

请教：在表中增加自动编号字段？