Question

VB中关于自动编号怎么做？

我在做一个表格,里面有一个文本栏里要求填写的是编号,而且要求系统自动生成,不能重复,按顺序从小到大生成就行了,就是1,2,3,4....这样生成，每次一个数，然后存入SQL数据库,请问这段自动编码的VB代码怎么写？
我需要通过在VB里用循环函数编写自动编号，能写的话给我写明一下，如果不能那我就从现在下面的这几种里选最简单的一种用了。

Answer 1

select count(*) as total from 数据表
如果total是0,
{
则新ID=1
}
else
{
如果total不是0,
则select max(id) as maxid from 数据表
获取maxid的值
新ID=maxid+1
}

当然有很多数据库支持ID自动增加的
SQL SERVER
ACCESS
很遗憾, 用DBF的自由表没有这个功能

Answer 2

浪费我这么多时间和精力！搞得我象是来骗分一样,这里不来也罢

Answer 3

用函数max对比数据库的字段值

Answer 4

一楼ZJ