Dim filter1 As Stringfilter1="单位名称= '" & e.Form.Controls("ComboBox1") & "' And 日期 >= #" & e.Form.Controls("startdate") & "# " msgbox(filter1)
出错了 不知道错在哪里