Access根据一条记录的字段内容生成这条记录的明细

dhygritek

Database7.rar (29.2 KB, 下载次数: 10)

2016-9-5 17:22 上传

点击文件名下载附件

求助高手帮忙看看VBA怎样写啊!
1.窗体上的，每一条记录为一批，一批产品有若干盒（也就是封装片盒数量）；
2.每一盒有盒号，也就是从01到11（最小盒号到最大盒号）；
3.标签的字段为：单晶号、批号、盒号、每盒片数、打印日期等；
4.每一条记录单独打印标签；
我有的问题就是要用循环语句生成这批产品的每盒数据,根据这一批的数据（字段内容），生成这一批产品的明细（盒号对应的片数）

marco

ACCESS查询也可以实现这种功能，不写代码，不生成数据，只要建一个辅助表即可。

建一个表“盒号”，一个字段“盒号”（字符型），里面从 01到最大可用到的盒数 99 进行填充。
再建一个查询即可：
SELECT 待打印数据表.单晶号, 待打印数据表.批号, 盒号.盒号, iif( 盒号.盒号<>待打印数据表.最大盒号, 待打印数据表.满盒片数, 待打印数据表.最后一盒片数) as 当盒片数,now() as  打印日期
FROM 待打印数据表 left join 盒号 on 盒号.盒号>=待打印数据表.最小盒号 and 盒号.盒号<=待打印数据表.最大盒号
order by 待打印数据表.id,盒号.盒号