Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinSchedule
Imports System.Diagnostics
Private Sub ultraCalendarInfo1_AfterSelectedHolidaysChange(ByVal sender As Object, ByVal e As System.EventArgs) Handles ultraCalendarInfo1.AfterSelectedHolidaysChange
'----------------------------------------------------------------------------------------------------
' 説明
' AfterSelectedHolidaysChange
'
' 1 つ以上の Holiday が選択または選択解除された後に発生します
'
'----------------------------------------------------------------------------------------------------
MessageBox.Show("The number of selected Holidays is " + Me.ultraCalendarInfo1.SelectedHolidays.Count.ToString() + vbCrLf, "AfterSelectedHolidaysChange", MessageBoxButtons.OK)
End Sub