Private Sub Assign_Appearances_to_DayOfWeek_Headers_Load( _ ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Load Me.UltraMonthViewSingle1.CalendarLook.DayOfWeekHeaderAppearance. _ FontData.Name = "Tahoma" Me.UltraMonthViewSingle1.CalendarLook.DayOfWeekHeaderAppearance. _ FontData.SizeInPoints = 14 Me.UltraMonthViewSingle1.CalendarLook.DayOfWeekHeaderAppearance. _ TextHAlign = Infragistics.Win.HAlign.Right Me.UltraMonthViewSingle1.CalendarLook.DayOfWeekHeaderAppearance. _ BackColor = Color.Aquamarine End Sub