You posted your question in SQL Server Development forum and you asked for sql function...

What report are you talking about? If this is SSRS report the VB.Net also has DatePart function you can use.

http://msdn.microsoft.com/en-us/library/20ee97hz(v=vs.71).aspx

=DatePart(DateInterval.WeekOfYear, Today)