Foxtable(狐表)用户栏目专家坐堂 → 关联表的自动编号


  共有4293人关注过本帖平板打印复制链接

主题:关联表的自动编号

帅哥哟,离线,有人找我吗?
seal51
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1837 积分:12990 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2014/1/15 21:52:00 [只看该作者]

Dim max As String
max = Tables("排产主表.排产明细表").Compute("max(序号)")
If max > "" Then
    e.DataRow("序号") = format(val(max)+1, "00")
Else
    e.DataRow("序号") = "01"
End If

 回到顶部
总数 14 1 2 下一页