![图片点击可在新窗口打开查看](https://pan.baidu.com/s/1nv2TvHf)
如图,想在打印控件内加入一段代码,目的是想在打印之前置换红框内表格控件中“送货明细表”中其中一列的内容,置换后不保存。
dim s as string = forms("包装顺序"). controls("号码").value
tables("送货明细表").replace("tables("送货明细表").current("箱号").split("-")(0)","ZY&Format(Date.Today(),"yyyyMMdd")&"-"&"s"")
如:将送货明细表所列的“箱号”列的数据:SC160212-1替换成 ZY20170309-01-1
SC160212-2替换成 ZY20170309-01-2
SC160212-3替换成 ZY20170309-01-3
所替换的数据仅为打印时替换,不保存在数据库中,以上代码有些问题,麻烦大侠们指教!