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 alltrim(str(, e.g.
.lblRecCount.Caption = ; "Record # " + ; alltrim(TRANSFORM(RECNO(), "9,999,999")) + ; " of " + ; alltrim(TRANSFORM(RECCOUNT(), "9,999,999")) + ; " records."