LOCAL lnRecno, lcAlias lcAlias = ALIAS() SELECT (Thisform.Grid.RowSource) lnRecno = RECNO() SUM TheFieldYouWant TO This.Value IF lnRecNo < RECCOUNT() GOTO lnRecNo ELSE GO BOTTOM SKIP ENDIF IF EMPTY(lcAlias) SELECT 0 ELSE SELECT (lcAlias) ENDIFNow whenever the data in the grid changes you can;
Thisform.Textbox.Refresh()and get the total displayed.