Hello,
here an example for culture "nl-Be"
kind regards,
Stefan
Public Function BepaalWeeknummer(ByVal x As Date) As String
Dim myCI As New CultureInfo("nl-BE")
Dim myCal As Calendar = myCI.Calendar
Dim myCWR As CalendarWeekRule = myCI.DateTimeFormat.CalendarWeekRule.FirstFourDayW eek
Dim myFirstDOW As DayOfWeek = myCI.DateTimeFormat.FirstDayOfWeek
If x.ToString <> "" Then
Return myCal.GetWeekOfYear(x, myCWR, myFirstDOW).ToString()
End If
End Function
"ReidarT" <re****@eivon.no> schreef in bericht news:ue**************@TK2MSFTNGP15.phx.gbl...
How do I find the weeknumber from a selected date from the calendar?
regards
reidarT