I tried using SQL (subquery for the Sum) to do it and the best I get
is a Sum on each of the three rows.  Looks dumb.  I only want it once,
and preferably below the correct column.

I don't know how to manipulate the grid **after** it has been filled
in by the query.  I know there are methods like Grid.Columns().Value
that I could use to iterate through the data but I just don't know
how.  How do you do that and then add the sum to the displayed grid?

This one has me stumped.  Thanks, a student named Paul.

P.S., I tried the following:
     Dim i As Integer
     Dim Sum As Double

     For i = 0 To grdReportsGrid.Row - 1
         Sum = Sum + grdReportsGrid.Columns(x).Value
            Next

        MsgBox Sum

Oh and put Option Explicit on the top of your code or else !  ;-)

--

Hi Frank, thanks for checking in.

        For i = 0 To grdReportsGrid.ApproxCount - 1
            grdReportsGrid.Row = 0 + i
              Sum = Sum + grdReportsGrid.Columns(0).Value
                Next

I need .Columns(0) so I can total the column. You can see that I
increment the row number according to the "i" value. It works fine
with a couple of
caveats:

1. I get a runtime error ("invalid row number") if the recordset
scrolls more than a couple of rows past the end of the grid's visible
default.

2. The only grid property I could find that would allow me to display
the Sum was the caption.  Is there a way to insert a row into a grid
and output the Sum there?  I looked at the grid methods and didn't see
anything hopeful.