Imports Infragistics.Windows.Editors
Imports Infragistics.Windows.Controls
Private Sub InitializeCalendar(ByVal calendar As XamMonthCalendar)
' by default the week numbers are not displayed
calendar.WeekNumberVisibility = Visibility.Visible
' by default the WeekRule is null and the week rule
' used is based on that of the culture (as specified
' by the FrameworkElement.Language property) but the
' WeekRule property can be used to override that
' setting
calendar.WeekRule = Globalization.CalendarWeekRule.FirstFullWeek
' similarly the FirstDayOfWeek is null and is based on
' the information in the culture
calendar.FirstDayOfWeek = DayOfWeek.Monday
End Sub