添加新记录时，ID字段数字自动+1怎么做？

londy00

DataSet11.Tables("申请表").Select("","ID Desc").GetValue(0).Item("ID") + 1

newmars

Select("","ID Desc")这里的第一个双引号里面是什么东西，帮说一下，谢谢！
新手

londy00

回楼上，应该是写一些简单的表达式来缩小寻找ROW的范围，就像写SQL语句后面的where语句吧。比如DataSet11.Tables("申请表").Select("ID = '111' And 名称 = 'AAA'"),找出来的应该也是行集。

身材正

新建一张表，专门存放当前最大的id,

荣誉吹吹

这是我们刚学的一个实践项目，ID是C后面加三位数字。你可以按照下面的模式来形成你需要的代码，希望对你有帮助。此表按ID号排列。
Dim custid, custidval As String
        dt = DataSet11.Tables("CustomerTracking") '将数据集中的表赋给dt
        len = dt.Rows.Count - 1 'dt.row.count表示dt表的行数
        dr = dt.Rows(len) '将dt表的最后一行给dr
        custid = dr("CustID") '将dr中的“CustID”给custid
        custidval = Mid(custid, 2, 3) '去后三位数字
        ctr = CInt(custidval) '转换成数值剔除前边的0
        If ctr >= 1 And ctr < 9 Then
            ctr = ctr + 1
            txtcustid.Text = "C00" & ctr
        ElseIf ctr >= 9 And ctr < 99 Then
            ctr = ctr + 1
            txtcustid.Text = "C0" & ctr
        ElseIf ctr >= 99 And ctr < 999 Then
            ctr = ctr + 1
            txtcustid.Text = "C" & ctr
        End If

newmars

回楼上，你这种方法只是找ID，没有什么高明之处呀，只是显示出来的问题。
3Q  londy00 的回复。