主题：请教查找按钮代码

你既然设置了ExcludeNullValue 属性，也就是排除空值，可是你进货表没有一行输入了单价，出货表更是全是空白，当然不会有结果：

DataTables("仓库存在统计表").DataRows.Clear()
Dim f As New Filler
f.SourceTable = DataTables("仓库入货明细")
f.SourceCols = "月份,类别,品名,规格与色号,单位,单价"
f.DataTable = DataTables("仓库存在统计表")
f.DataCols = "月份,类别,品名,规格与色号,单位,单价"
f.ExcludeExistValue = True
f.ExcludeNullValue = True
f.Fill()