how to renumber the record in Access using a simple VB macro(編號:5279)

field name: rec_no  producta productb
1    ssss   rrrr
        3    tttt   oooo
        8    uuuu   iiii
        9    bbbb   yyyy

rec_no 2, 4,5,6,7 已經刪除
after renumber the record, 做出來, 應是這樣
field name: rec_no  producta productb
1    ssss   rrrr
        2    tttt   oooo
        3    uuuu   iiii
        4    bbbb   yyyy

請幫忙