Record number 345 of 574>
Record number 3,5 of 5,4>
>WITH ThisForm > IF EOF() > .lblRecCount.Caption = ; > "At End of File. " + ; > TRANSFORM(ALLTRIM(STR(RECCOUNT())), "9,999,999") + ; > " records." > ELSE > .lblRecCount.Caption = ; > "Record # " + ; > TRANSFORM(ALLTRIM(STR(RECNO())), "9,999,999") + ; > " of " + ; > TRANSFORM(ALLTRIM(STR(RECCOUNT())), "9,999,999") + ; > " records." > ENDIF > .Refresh() >ENDWITH >You don't need the ALLTRIM(STR()) around the RECNO(). TRANSFORM() will handle that.