We're not there, we can't see your data, nor your query, nor the desired end
result.

More info, please...

Regards

Jeff Boyce
Microsoft Office/Access MVP

Using VB, I would do this is as follows:

1)     Create a module that contains variables to store the values I wish to
use as query criteria, a procedure that allows me store these values for
later use using code and a retrieval function that returns these values for
use in a my target query.

   Example Module Contents
   ---------------------------

   'variable to store Month Start Date
   Private dtMthStart As Date

   'variable to store Month End Date
   Private dtMthEnd As Date

   '******************************************
   Sub setGlobalMonthStartEnd(dtDate As Date)
   '******************************************
   '   Used to set Month Start and Month End date values
   '   based on parameter dtDate for later use by database
   '******************************************
       dtMthStart = DateSerial(Year(dtDate), Month(dtDate), 1)
       dtMthEnd = DateSerial(Year(dtDate), Month(dtDate) + 1, 0)
   End Sub

   '******************************************
   Function dtGetGlobal(strVar As String) As Date
   '******************************************
   '  Returns the value of either Month Start or Month End
   '  Note: If these values have not been set,  it uses
   '            the current date to return a value
   '******************************************
       Select Case strVar
       Case "MthStart"
           If IsNull(gdtMthStart) Then
               dtGetGlobal= DateSerial(Year(Date), Month(Date), 1)
           Else
               dtGetGlobal= dtMthStart
           End If
       Case "MthEnd"
           If IsNull(gdtMthStart) Then
               dtGetGlobal = DateSerial(Year(Date), Month(Date) + 1, 0)
           Else
               dtGetGlobal = dtMthEnd
           End If
       End Select

   End Function

2) Create a query that uses the retrieval function to set the criteria

   Sample Query Contents
   ------------------------------
   SELECT FieldDate, FieldX, FieldY FROM TableX WHERE FieldDate BETWEEN
dtGetGlobal("MthStart") AND dtGetGlobal("MthEnd");

3) In the form where I want to generate something based on the query I do
the following:

   a) Get a date that is in the month for the desired results and store it
to a local date variable.

   b) Call the sub to define the Month Start and End date values using the
local variable.

           setGlobalMonthStartEnd dateVariable

   c) Use the query to acheive the desired results, be it to create a
report, or perform other processing, based on the query.

Brian M