e.DataRow("入库28日") = DataTables("采购入库明细").sql Compute("Sum(数量)", "物料编码 ='" & dr2("货物编码") & "'and 日期 ='" & New Date(y, m, 28) & "'")
e.DataRow("入库29日") = DataTables("采购入库明细").sql Compute("Sum(数量)", "物料编码 ='" & dr2("货物编码") & "'and 日期 ='" & New Date(y, m, 29) & "'")
e.DataRow("入库30日") = DataTables("采购入库明细").sql Compute("Sum(数量)", "物料编码 ='" & dr2("货物编码") & "'and 日期 ='" & New Date(y, m, 30) & "'")
e.DataRow("入库31日") = DataTables("采购入库明细").sql Compute("Sum(数量)", "物料编码 ='" & dr2("货物编码") & "'and 日期 ='" & New Date(y, m, 31) & "'")
二月份及小月没有28、29、30、31日时会出错，这个怎样规避