Either-
1) Set up a query for your form and add a calculated field called, say. WeekNo where-
WeekNo: Format([YourDateField],"ww")
2) On the form, draw your text box, double click on it and set it's ControlSource property to -
=Format([YourDateField],"ww")