Imports Infragistics.Win Imports Infragistics.Win.UltraWinSchedule Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If Not Me.UltraDayView1.ActiveOwner Is Nothing Then Dim activities As ArrayList = Me.GetOwnerActivity(Me.UltraDayView1.ActiveOwner) End If End Sub Private Function GetOwnerActivity(ByVal theOwner As Infragistics.Win.UltraWinSchedule.Owner) As ArrayList If (Not theOwner Is Nothing) Then Dim activities As ArrayList = New ArrayList(100) activities.AddRange(theOwner.GetOwnedRecurringAppointments()) activities.AddRange(theOwner.GetOwnedNonRecurringAppointments()) activities.AddRange(theOwner.GetOwnedNotes()) Return activities Else Return Nothing End If End Function
using Infragistics.Win; using Infragistics.Win.UltraWinSchedule; using System.Diagnostics; private void button1_Click(object sender, System.EventArgs e) { if ( this.ultraDayView1.ActiveOwner != null ) ArrayList activities = this.GetOwnerActivity( this.ultraDayView1.ActiveOwner ); } private ArrayList GetOwnerActivity( Owner owner ) { if ( owner != null ) { ArrayList activities = new ArrayList( 100 ); activities.AddRange( owner.GetOwnedRecurringAppointments() ); activities.AddRange( owner.GetOwnedNonRecurringAppointments() ); activities.AddRange( owner.GetOwnedNotes() ); return activities; } else return null; }
Target Platforms: Windows 10, Windows 8.1, Windows 8, Windows 7, Windows Server 2012, Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2