以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  excel报表如何实现写入日期及出库人？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=141750)
--  作者：evolymft
--  发布时间：2019/10/10 11:08:00
--  excel报表如何实现写入日期及出库人？
excel报表如何实现写入日期及出库人？
图片点击可在新窗口打开查看
--  作者：evolymft
--  发布时间：2019/10/10 11:09:00
--  

图片点击可在新窗口打开查看此主题相关图片如下：1.png
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2019/10/10 11:14:00
--  
需要使用代码处理：http://www.foxtable.com/webhelp/topics/1145.htm
--  作者：evolymft
--  发布时间：2019/10/14 10:27:00
--  
谢谢老师指点，再请教连接外部ACCESS数据库，保留4位小数，数据100-50-20-10-3.5-3.4-3-10.1=0.0001。 不能减成0。
--  作者：evolymft
--  发布时间：2019/10/14 10:30:00
--  
用代码做减法
--  作者：evolymft
--  发布时间：2019/10/14 10:31:00
--  
保留2位小数会不会就对了？
--  作者：有点蓝
--  发布时间：2019/10/14 10:41:00
--  
贴出代码说明。
--  作者：evolymft
--  发布时间：2019/10/14 11:24:00
--  
谢谢老师，我用DECIMAL试一下。
--  作者：evolymft
--  发布时间：2019/10/15 10:51:00
--  
Dim dr As DataRow = DataTables("入库").Find("\'[日期] = \' & thrq & \'and [品名] = \' & thpm & ")
--  作者：evolymft
--  发布时间：2019/10/15 10:53:00
--  
请教老师：楼上代码如何修改，谢谢。