How to retrieve the current week number in WinForms ScheduleControl?

private void bt_weeknumber_Click(object sender, EventArgs e)
{
   // to set specific cluture
   CultureInfo CI = new CultureInfo("en-US");
   Calendar Cal = CI.Calendar;
   // first week of year
   CalendarWeekRule CWR = CI.DateTimeFormat.CalendarWeekRule;
   // first day of week
   DayOfWeek FirstDOW = CI.DateTimeFormat.FirstDayOfWeek;
   // to get the current week number
   int week = Cal.GetWeekOfYear(DateTime.Now, CWR, FirstDOW);
   Console.WriteLine("\n\nThe CalendarWeekRule used for the en-US culture is {0}.", CWR);
   Console.WriteLine("\nThe FirstDayOfWeek used for the en-US culture is {0}.", FirstDOW);
   Console.WriteLine("\nTherefore, the current week is Week {0} of the current year.", week.ToString());
}

Private Sub bt_weeknumber_Click (ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click
   ' to set specific cluture
   Dim CI As New CultureInfo("en-US")
   Dim Cal As Calendar = CI.Calendar
   ' first week of year
   Dim CWR As CalendarWeekRule = CI.DateTimeFormat.CalendarWeekRule
   ' first day of week
   Dim FirstDOW As DayOfWeek = CI.DateTimeFormat.FirstDayOfWeek
   ' to get the current week number
   Dim week As Integer = Cal.GetWeekOfYear(DateTime.Now, CWR, FirstDOW)
   Console.WriteLine(Constants.vbLf + Constants.vbLf & "The CalendarWeekRule used for the en-US culture is {0}.", CWR)
   Console.WriteLine(Constants.vbLf & "The FirstDayOfWeek used for the en-US culture is {0}.", FirstDOW)
   Console.WriteLine(Constants.vbLf & "Therefore, the current week is Week {0} of the current year.", week.ToString())
End Sub