Ms access Code to delete all records in a Tables

Dear all,

Can somebody point me in the right direction
for some VBA code to delete all records
in 3 different tables with Command button

Table Name :

1. BGS
2. DPS
3. CMS

I try below vba but not working

Please Login or Register  to view this content.

Thank you in advanced