Thanks both of you to help to solve my problem.
Power
>
In a form, I have a grid (record source is Table A), a delete button to delete a record and a label to show the total no. of record (by using reccount())
>>I want to use the label to show the most update of no. of record.
>>My problem is if I add "pack" after my delete code, it will make my grid become blank.
>>If I don't add "pack" to my code, the label will show the no. of record including the deleted record. So what can I do?
>>
>
>Hi Power,
>
>If you want to pack, you can unbind the recordsource, pack, then rebind and you won't loose the grid...
>
>
>ThisForm.myGrid.RecordSource = ''
>** do your delete code and pack **
>ThisForm.myGrid.RecordSource = 'tableA'
>
>
Power Wong
Every problem will have a solution, the only problem is that can you find it out.