- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 有关数据合并的难题困扰我多时，急求给与帮助解决！谢谢！ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=22372)
-- 发布时间：2012/8/10 11:22:00
-- 有关数据合并的难题困扰我多时，急求给与帮助解决！谢谢！
我在用foxtable编辑一个表格时，公司让我给表格添加一项功能，希望能实现以下这个功能：
例如，我有一表格，有产品编码、产品供货商代码、供货日期、工厂产品代码列，我想把产品编码11012DC，产品供货商代码WP113，供货日期2012-03-06，合并成11012DCWP11320120306,并自动填入工厂产品代码列。Foxtable能实现这一功能吗？或者是不是要用到些编程啊？能不能给点解决办法？非常感谢！
-- 发布时间：2012/8/10 12:42:00
--
很简单的一个功能，你设计好这个表，输入几行数据，然后传上来，我帮你设置一下。
-- 发布时间：2012/8/10 16:18:00
--
谢谢狐狸爸爸回复，实在抱歉现在才上网查找您的回帖！我刚刚重新做了一个小表格，希望把：
模具号ZA+机台号17+日期20120810+班次1，这几项都输到每列里，得出批号为ZA17201208101
我给您foxtable压缩包，您在里面改下，再麻烦您传给我，然后和我说下什么地方修改了，我对照您的修改再结合到之前那个表中。麻烦您呢！非常感谢！
我给您foxtable压缩包，您在里面改下，再麻烦您传给我，然后和我说下什么地方修改了，我对照您的修改再结合到之前那个表中。麻烦您呢！非常感谢！
-- 发布时间：2012/8/10 16:19:00
--
您能收到压缩包吗？
-- 发布时间：2012/8/14 13:11:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:工厂管理项目_0814.zip |
-- 发布时间：2012/8/14 13:12:00
--
拜托狐狸爸爸了，谢谢！
-- 发布时间：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
-- 发布时间：2012/8/14 23:12:00
--
非常感谢！！！谢谢！