以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]编号不能连续  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=4987)

--  作者:huaneng
--  发布时间:2009/11/14 21:52:00
--  [求助]编号不能连续
在窗口增加一个按扭,代码如下:

Dim dr As Row
dr = Tables("客户信息").AddNew()
Dim bb As Integer
bb = Tables("客户信息").Compute("max(客户编号)")
dr("客户编号") = Format(bb+1,"0000")


为什么生成的编号总是加2的,,,2 4 6 8这样呢

谁帮我看看哪里错了,谢谢
--  作者:yangming
--  发布时间:2009/11/14 22:31:00
--  

代码没错,是不是在表的新增行事件中有代码?


--  作者:huaneng
--  发布时间:2009/11/14 23:46:00
--  
哈哈,高人,一语命中,感谢!!