Progress: Date Entry

Please suggest a Progress programm which would enter the current date in a
VB form field if it is empty when I enter the VB form and would leave a
pre-entered date if the field containes a date already. Thank you.