Visual Basic - Contar en que semanas del año estamos

Necesito saber como le hago para saber el numero de semana en la que estamos automaticamente en access o visual Basic

Agradeceria que me ayudaran, porfa si alguien sabe que me ayude

Bueno, si alguien mas esta como yo y encuentra esto, les digo que el codigo que necesitaba estaba aqui mismo pero yo no habia buscado y creabnme que me pase tres dias buscandolo o probando como se hace, crei que era complicado pero..., mejor mirenlo ustedes haber como les parece.

Dim dFecha As Date, iSemana As Integer
dFecha = Date ' HOY
iSemana = DatePart("ww", dFecha, vbMonday, vbFirstFourDays)
MsgBox "Estamos en la semana número " & iSemana

Con cuatro lineas se logra todo

Suerte, sigan adelante y si esto les hacia la vida de cuadritos, ya no lo hara

Lo que nos hace la vida de cuadritos es que se llene el foro con preguntas y respuestas repetidas, lo acabo de decir en otro mensaje.