Private Sub ultraMonthViewMulti1_BeforeDisplayMonthPopup(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinSchedule.BeforeDisplayMonthPopupEventArgs) Handles ultraMonthViewMulti1.BeforeDisplayMonthPopup
' The BeforeDisplayMonthPopup event is a "cancelable" event,
' which means that the action to which it corresponds can be
' prevented from happening by canceling the event.
'
' Canceling an event is very simple - just set the 'Cancel'
' property of the event arguments to true. The action will then
' be prevented from happening, and the corresponding "After"
' event will not fire.
' If the month for which the popup is being displayed is
' not in the current year, we will cancel the event, effectively
' diallowing the displaying of the popup.
If (e.Month.Year.YearNumber <> DateTime.Today.Year) Then
e.Cancel = True
End If
End Sub