|
Select Case Me!报表预览
Case 1
DoCmd.OpenReport "出入存库金额数量查询", PrintMode
Case 2
If IsNull(Forms![查询结存对话框]!选择类别) Then
DoCmd.OpenReport "各类商品结存查询", PrintMode
Else
strwherecategory1 = "品名 = " + Forms![查询结存对话框]!选择类别 + "" And "货号 = '" + Forms![查询结存对话框]!货号 + " '" And "规格 = '" + Forms![查询结存对话框]!规格 + " '"
DoCmd.OpenReport "各类商品结存查询", PrintMode, , strwherecategory1
End If
End Select
DoCmd.close acForm, "查询结存对话框"
帮我看看,为什莫strwherecategory1 = "品名 = " + Forms![查询结存对话框]!选择类别 + "" 起作用,加上后面的几个条件就不行了, |
|