主题：[求助] 查询历史记录

版主，这个图中是一piao出货记录，想实双击某条记录后，出现这个产品以前的包装历史记录包括boxno,shipppingno以及和哪些产品装在一起的清单。以下代码该如何修改。谢谢。

 

If e.Table.Current Is Nothing Then Return

Dim wz As Integer = Tables("Packinglist").FindRow("GSSPartNo='" & e.Table.Current("boxno") &"'")
If wz >=0 Then
    Tables("Packinglist").Position = wz
End If

此主题相关图片如下：捕获.png

谢谢，这个是指到找到的这个记录，可不可以这个明细只出现这个产品以前包装过的相关的箱号的记录，多余的不需要呢？只要装在一个箱中的都需显示

版主，如果双击记录CH_000121 就出现这种结果如图，这个产品以前其它产品装要哪些boxno中。

此主题相关图片如下：捕获.png

版主，只知道GSSPartNo,就能找出这个GSSPartNo跟以前哪些产品合装过吗？

但是这个GSSPartNo装在该boxno中的其它GSSPartno就没有显示了。 想知道这个GSSPartNO,以前装过的Boxno，还有哪些其它GSSPartno。

版主，显示错误， 没有定义xxx