In my form I have seven fields I need to use this code for (Date, Job #, Class, Activity, Cost Type, Account, & Comment). I have entered the following code:<br><br>Private Sub Date_LostFocus()<br> If Nz(Date) = "" Then Me.Date = mdatVar1<br>End Sub<br><br>Private...