skal bruge ugenr i stedet for hele datoen

Prøv at kig på denne side:

http://konsulent.sandelien.no/VB_help/Week/

Hvis du selv vil regne det ud:

    Public Shared Function WeekNumber(year As Integer, mon As Integer, day As Integer) As Integer
        Dim a,y,m,JD,d4,L,d1 As Integer
        a = (14 - mon) \ 12
        y = year + 4800 - a
        m = mon + 12*a - 3
        JD = day + (153 * m + 2)\5 + 365*y + y\4 - y\100 + y\400 - 32045
        d4 = (((JD + 31741 - JD Mod 7) Mod 146097) Mod 36524) Mod 1461
        L = d4 \ 1460
        d1 = ((d4 - L) Mod 365) + L
        WeekNumber = d1 \ 7 + 1
    End Function

men hvordan bruger jeg det???

Jeg formoder du mener Jakobs link, fordi ovenstående funktion er nem at kalde.

(at indholdet af den virker kryptisk er en helt anden sag)

jeg er såden set ligeglad, bare jeg får det til at virke, linket er også c# og jeg bruger vb, så at få dit til at virke er helt fint med mig

Så brug arne_v eksempel!
Det kan næsten ikke være mere ligetil!

Så smider du funktionen ind i din kode:

Public Shared Function WeekNumber(year As Integer, mon As Integer, day As Integer) As Integer
        Dim a,y,m,JD,d4,L,d1 As Integer
        a = (14 - mon) \ 12
        y = year + 4800 - a
        m = mon + 12*a - 3
        JD = day + (153 * m + 2)\5 + 365*y + y\4 - y\100 + y\400 - 32045
        d4 = (((JD + 31741 - JD Mod 7) Mod 146097) Mod 36524) Mod 1461
        L = d4 \ 1460
        d1 = ((d4 - L) Mod 365) + L
        WeekNumber = d1 \ 7 + 1
    End Function

Og så kalder du den med:
lblDato.Text = WeekNumber(DateTime.Now.Year, DateTime.Now.Month, DateTime.Now.Day)

Brug dog den indbyggede funktion:

dim uge as integer:
uge =  DatePart("ww", Now, vbUseSystemDayOfWeek, vbFirstFullWeek)

Skift evt. datoen(Now) ud med den dato du ønsker at finde ugenr. på

Hm.

1)  det er ikke en ægte .NET funktion (er gemt i namespace Microsoft.VisualBasic)

2)  den returnerer ikke altid det rigtige ugenummer

[re 2 - jeg er ikke helt klar over om de to sidste parametre kan ændres
så den returnerer det rigtige]

peanut>

Tid at få afsluttet ?

Og et svar fra mig

en lidt mere simpel version :-)

using System.Globalization;
public static int GetWeekNumber(DateTime inDate) {
    GregorianCalendar gCalendar = new GregorianCalendar();
    return gCalendar.GetWeekOfYear( inDate,CalendarWeekRule.FirstFourDayWeek,DayOfWeek.Monday );
}