Imports Infragistics.Win
Imports Infragistics.Win.UltraWinSchedule
PrivateSub UltraDayView1_BeforePerformAction(ByVal sender AsObject, ByVal e As Infragistics.Win.UltraWinSchedule.BeforeDayViewPerformActionEventArgs) Handles UltraDayView1.BeforePerformAction
' Cancel the event if the action is 'DeleteSelectedAppointments', to
' prevent the end user from deleting appointments via the keyboard.
If e.Action = UltraDayViewAction.DeleteSelectedAppointments Then
e.Cancel = TrueEndIfEnd SubPrivateSub UltraDayView1_AfterPerformAction(ByVal sender AsObject, ByVal e As Infragistics.Win.UltraWinSchedule.AfterDayViewPerformActionEventArgs) Handles UltraDayView1.AfterPerformAction
' Make the system 'beep' sound if the end user cancels edit mode
If e.Action = UltraDayViewAction.EndCurrentEditDiscardChanges ThenBeep()
EndIfEnd Sub
using Infragistics.Win;
using Infragistics.Win.UltraWinSchedule;
using System.Diagnostics;
privatevoid ultraDayView1_BeforePerformAction(object sender, Infragistics.Win.UltraWinSchedule.BeforeDayViewPerformActionEventArgs e)
{
// Cancel the event if the action is 'DeleteSelectedAppointments', to
// prevent the end user from deleting appointments via the keyboard.
if ( e.Action == UltraDayViewAction.DeleteSelectedAppointments )
e.Cancel = true;
}
privatevoid ultraDayView1_AfterPerformAction(object sender, Infragistics.Win.UltraWinSchedule.AfterDayViewPerformActionEventArgs e)
{
// Make the system 'beep' sound if the end user cancels edit mode
if ( e.Action == UltraDayViewAction.EndCurrentEditDiscardChanges )
{
// Note: requires a reference to the Microsoft.VisualBasic assembly
Microsoft.VisualBasic.Interaction.Beep();
}
}