[求助]关于数据置换的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]关于数据置换的问题

共有1663人关注过本帖树形打印复制链接主题：[求助]关于数据置换的问题

rophy0952

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：581 积分：4989 威望：0 精华：0 注册：2014/6/12 14:55:00

[求助]关于数据置换的问题 发帖心情

Post By：2017/3/9 12:25:00 [显示全部帖子]

如图，想在打印控件内加入一段代码，目的是想在打印之前置换红框内表格控件中“送货明细表”中其中一列的内容，置换后不保存。

dim s as string = forms("包装顺序"). controls("号码").value

tables("送货明细表").replace("tables("送货明细表").current("箱号").split("-")(0)","ZY&Format(Date.Today(),"yyyyMMdd")&"-"&"s"")

如：将送货明细表所列的“箱号”列的数据：ＳＣ１６０２１２-１替换成　ＺＹ２０１７０３０９－０１－１

　　　　　　　　　　　　　　　　　　　ＳＣ１６０２１２-２替换成　ＺＹ２０１７０３０９－０１－２

　　　　　　　　　　　　　　　　　　　ＳＣ１６０２１２-３替换成　ＺＹ２０１７０３０９－０１－３

所替换的数据仅为打印时替换，不保存在数据库中，以上代码有些问题，麻烦大侠们指教！

rophy0952

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：581 积分：4989 威望：0 精华：0 注册：2014/6/12 14:55:00

Post By：2017/3/9 13:56:00 [显示全部帖子]

多谢有点色！

基本上能实现我的需求，但是有两个问题：1. 点击一次打印临时列可以替换“箱号”列，当换下一张进行打印的时候，那临时列和“箱号”列都不出现了，无法连续打印 2. 设置临时列的列宽的代码是什么？谢谢！

如图：

没打印之前的图（原表的内容）：

进入系统后第一次打印的图（成功替换了）：

换张单据再打印时的图（两列都消失了）：

rophy0952

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：581 积分：4989 威望：0 精华：0 注册：2014/6/12 14:55:00

Post By：2017/3/9 14:47:00 [显示全部帖子]

现在可以连续打印了，请问临时列的列宽如何调节呢？

rophy0952

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：581 积分：4989 威望：0 精华：0 注册：2014/6/12 14:55:00

Post By：2017/3/9 15:19:00 [显示全部帖子]

试过，由于“箱号”列的宽度比替换后生成的字符要要窄，所以请问能否直接设置临时列的宽度呢？

主题：[求助]关于数据置换的问题