Clear all the fields in a form?

Hello,

I have a form with several fields in an Access 2000 based project. I am looking for a command button function which would erase off or clear all the textboxes/selections made in combo boxes and restore to a blank form. :confused:

If anyone has any idea on how to proceed with this, please do let me know.

Thanks.

dim ctl as control

for each ctl in me.controls
ctl=vbnullstring
next
me is the form. Throw this into the buttons OnClick sub.