Foxtable(狐表)用户栏目专家坐堂 → 有关数据合并的难题困扰我多时,急求给与帮助解决!谢谢!


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

主题:有关数据合并的难题困扰我多时,急求给与帮助解决!谢谢!

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


加好友 发短信
等级:婴狐 帖子:6 积分:107 威望:0 精华:0 注册:2012/8/9 16:37:00
有关数据合并的难题困扰我多时,急求给与帮助解决!谢谢!  发帖心情 Post By:2012/8/10 11:22:00 [只看该作者]

我在用foxtable编辑一个表格时,公司让我给表格添加一项功能,希望能实现以下这个功能:

例如,我有一表格,有产品编码、产品供货商代码、供货日期、工厂产品代码列,我想把产品编码11012DC,产品供货商代码WP113,供货日期2012-03-06,合并成11012DCWP11320120306,并自动填入工厂产品代码列。Foxtable能实现这一功能吗?或者是不是要用到些编程啊?能不能给点解决办法?非常感谢!


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/8/10 12:42:00 [只看该作者]

很简单的一个功能,你设计好这个表,输入几行数据,然后传上来,我帮你设置一下。

 回到顶部
帅哥哟,离线,有人找我吗?
钟肆著遇
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:6 积分:107 威望:0 精华:0 注册:2012/8/9 16:37:00
  发帖心情 Post By:2012/8/10 16:18:00 [只看该作者]

谢谢狐狸爸爸回复,实在抱歉现在才上网查找您的回帖!我刚刚重新做了一个小表格,希望把:
模具号ZA+机台号17+日期20120810+班次1,这几项都输到每列里,得出批号为ZA17201208101
我给您foxtable压缩包,您在里面改下,再麻烦您传给我,然后和我说下什么地方修改了,我对照您的修改再结合到之前那个表中。麻烦您呢!非常感谢!

 回到顶部
帅哥哟,离线,有人找我吗?
钟肆著遇
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:6 积分:107 威望:0 精华:0 注册:2012/8/9 16:37:00
  发帖心情 Post By:2012/8/10 16:19:00 [只看该作者]

您能收到压缩包吗?

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


加好友 发短信
等级:等待验证 帖子:3855 积分:20692 威望:0 精华:5 注册:2012/6/21 14:03:00
  发帖心情 Post By:2012/8/10 17:18:00 [只看该作者]

用户已被锁定

 回到顶部
帅哥哟,离线,有人找我吗?
钟肆著遇
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:6 积分:107 威望:0 精华:0 注册:2012/8/9 16:37:00
  发帖心情 Post By:2012/8/14 13:11:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:工厂管理项目_0814.zip


 回到顶部
帅哥哟,离线,有人找我吗?
钟肆著遇
  7楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:6 积分:107 威望:0 精华:0 注册:2012/8/9 16:37:00
  发帖心情 Post By:2012/8/14 13:12:00 [只看该作者]

拜托狐狸爸爸了,谢谢!

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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33957 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2012/8/14 13:28:00 [只看该作者]

DataColChanged事件代码:


Select Case e.DataCol.Name
    Case "模具号","机台号","日期","班次"
        Dim dr As DataRow = e.DataRow
        Dim s As String = Iif(dr.IsNull("日期") = False,Format(dr("日期"),"yyMMdd"),"") & Iif(dr.IsNull("班次")=False,dr("班次"),"")
        dr("批号") = dr("模具号") & dr("机台号") & s
End Select


 回到顶部
帅哥哟,离线,有人找我吗?
钟肆著遇
  9楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:6 积分:107 威望:0 精华:0 注册:2012/8/9 16:37:00
  发帖心情 Post By:2012/8/14 23:12:00 [只看该作者]

非常感谢!!!谢谢!


 回到顶部