Foxtable(狐表)用户栏目专家坐堂 → 如何让自动编号在填充相关数据后再生成


  共有1638人关注过本帖树形打印复制链接

主题:如何让自动编号在填充相关数据后再生成

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


加好友 发短信
等级:三尾狐 帖子:787 积分:6175 威望:0 精华:0 注册:2015/7/25 19:14:00
如何让自动编号在填充相关数据后再生成  发帖心情 Post By:2017/7/13 21:11:00 [只看该作者]

让不重复的目录级档号自动生成,我在表事件DataColChanged中写如下代码

Dim dr As DataRow = e.DataRow
Select Case e.DataCol.name
    Case "全宗号","案卷目录号","案卷号"
           dr("目录级档号") = format(val(dr("全宗号")),"0000") & "-" & format(val(dr("案卷目录号")),"000") &"-" & format(Val(dr("案卷号")),"0000000")
End Select

 

当在“”全宗号“”列输入值,目录级档号即生成,导致禁止重复的设置提示对话框弹出,如何才能做到目录级档号在填充相关数据后再生成?

谢谢


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/13 22:01:00 [只看该作者]


 回到顶部