Hi Neil

>I would like to test if a grid has been populated programmatically.
>IF empty(thisform.pageframe1.page1.grid1.RecordSource="")
> MESSAGEBOX("There are no records in the grid to filter on!")
> RETURN
>ENDIF
>

How about something like this...

lcAlias = thisform.pageframe1.page1.grid1.RecordSource
IF NOT EMPTY( lcAlias ) AND USED( lcAlias )
  IF RECCOUNT( lcAlias ) < 1
    MESSAGEBOX("There are no records in the grid to filter on!")
    RETURN
  ENDIF
ENDIF