- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 销售明细表中如何自动产生顺序号？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=26930)
-- 发布时间：2012/12/17 17:06:00
-- 销售明细表中如何自动产生顺序号？
销售明细表中如何自动产生顺序号？
如图示：
此主题相关图片如下：668888.jpg
此主题相关图片如下：668888.jpg[此贴子已经被作者于2012-12-17 17:06:36编辑过]
-- 发布时间：2012/12/17 17:15:00
--
论坛中找到帖子了，先看看
-- 发布时间：2012/12/17 17:16:00
--
首先，定义成数值类型。
Dim max As Integer = Tables("xxx").Compute("max(顺序号)") + 1
-- 发布时间：2012/12/17 17:25:00
--
string 型与 Integer 怎样相互转换呢
-- 发布时间：2012/12/17 17:26:00
--
如：
顺序号
1
2
3
98
转换为：
001
002
003
098
-- 发布时间：2012/12/17 17:32:00
--
http://www.foxtable.com/help/topics/0361.htm
-- 发布时间：2012/12/17 17:52:00
--
Dim n As Integer = Tables("销售订单").Current("销售订单id")
Dim r As DataRow = DataTables("销售明细").AddNew
r("销售订单id") = n
Dim max As Integer = Tables("销售明细").Compute("max(项次)", "[销售订单id] = \'" & n & "\'" ) + 1
r("项次") = max
感谢，这样可以了