Foxtable(狐表)用户栏目专家坐堂 → [求助]自动编号


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

主题:[求助]自动编号

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/11 20:49:00 [显示全部帖子]

datacolchanged事件

if e.datacol.name = "一级科目" then
    select case e.datarow("一级科目")
      case "人工成本"
        e.datarow("一级科目编号") = "001"
      case "行政管理费用"
        e.datarow("一级科目编号") = "002"
 end select
end if

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/12 8:27:00 [显示全部帖子]

新建一个表专门存储科目和编码的对应。通过查表获取编码

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/12 8:42:00 [显示全部帖子]

可以使用一个表,用一个级别列区分不同的科目类型即可

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/13 9:00:00 [显示全部帖子]

例如

datacolchanged事件

if e.datacol.name = "一级科目" then
dim dr as datarow = datatables("字典表").find("类别=‘一级科目’ and 名称 ='" &  e.datarow("一级科目") & "'")
if dr isnot nothing then
e.datarow("一级科目编号") = dr("编码")
end if
end if

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/13 10:06:00 [显示全部帖子]

这种字典类的数据一般没多少,手工录入就行了。何况这个编码有规律吗?

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/13 10:39:00 [显示全部帖子]

我的代码只是抛砖引玉,放到具体项目中请理解改改再用,如果只会照抄,请先学学基础。


 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/10 11:04:00 [显示全部帖子]

没看懂,请上传实例说明

 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/11 9:28:00 [显示全部帖子]

就是这个用法:http://www.foxtable.com/webhelp/topics/2403.htm,都差不多的

 回到顶部