convert date to week of the year

[Pat Wright]

I need to convert a date entered on a form into the week
of the year. Converting in a query is easy enough, but I
need to take the date entered in the form and have the
week of the year show up. Something like this:

Dim getweekdate As String

getweekdate = [Forms]![production report]![end]
[weekdate] = getweekdate
Format [getweekdate], "ww / yyyy"

End Sub

I know, I'm a horrible coder, but thanks for any help.

Pat Wright

 

[JohnFol]

Forget code.
In the text box you want the week/year displayed, set the control source to

=[end]

Then set the controls format property to be

ww/yyyy