我的程序段如下:Private Sub Command9_Click()
If Combo1.Text = "" Then
 MsgBox "请选择查询部门!"
 Exit Sub
End IfIf Combo1.Text = "办公室" Then
If DataEnvironment1.rsCommand1.State <> adStateClosed Then
        DataEnvironment1.rsCommand1.Close
End If
    DataEnvironment1.Commands("Command1").Parameters(0) = CStr(DTPicker1.Value)
    DataReport1.Show
    DataReport1.Sections(2).Controls("Label4").Caption = "统计时间:" & CStr(DTPicker1.Value)
    
ElseIf Combo1.Text = "经营部" Then
If DataEnvironment1.rsCommand2.State <> adStateClosed Then
        DataEnvironment1.rsCommand2.Close
End If
    DataEnvironment1.Commands("Command2").Parameters(0) = CStr(DTPicker1.Value)
    DataReport1.Show
    DataReport1.Sections(2).Controls("Label4").Caption = "统计时间:" & CStr(DTPicker1.Value)
End If
End Sub当我combo1.text值为“办公室”时,报表显示正常
但当combo1.text值为“经营部”时,就报错:参数param1没有默认值。
请问问题出在哪里呢?