在访问中
DATE_FIELD BETWEEN #2/2/2012# AND #2/4/2012#
是相同的
DATE_FIELD >=#2/2/2012# AND <=#2/4/2012#
rst.Open "SELECT DISTINCT AdHocReport.[BillID] FROM AdHocReport WHERE AdHocReport.[CxName] = '" & CName & "' AND (AdHocReport.[ConsolidationDate] BETWEEN #" & FromDate & "# AND #" & ToDate & "#)", con, 1, 3