Private Sub UltraMonthViewSingle1_AfterActivitiesDeleted(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ultraMonthViewSingle.AfterActivitiesDeleted '---------------------------------------------------------------------------------------------------- ' 説明 ' AfterActivitiesDeleted ' ' コントロール UI で 1 つ以上の Appointment または Note を削除した後に発生します ' BeforeActivitiesDeleted イベントをキャンセルしないと、AfterActivitiesDeleted イベントが発生します ' '---------------------------------------------------------------------------------------------------- ' 各アクティビティ コレクションのカウントを取得します Dim appointmentCount As Integer = Me.ultraMonthViewSingle.CalendarInfo.Appointments.Count Dim noteCount As Integer = Me.ultraMonthViewSingle.CalendarInfo.Notes.Count ' 新しいカウントの情報を含む MessageBox を表示します Dim info As String = String.Empty info += "There are currently " + appointmentCount.ToString() + " Appointment(s), " info += "and " + noteCount.ToString() + " Note(s) remaining." MessageBox.Show(info, "AfterActivitiesDeleted", MessageBoxButtons.OK) End Sub
private void ultraMonthViewSingle1_AfterActivitiesDeleted(object sender, System.EventArgs e) { //---------------------------------------------------------------------------------------------------- // 説明 // AfterActivitiesDeleted // // コントロール UI で 1 つ以上の Appointment または Notes を削除した後に発生します // BeforeActivitiesDeleted イベントをキャンセルしないと、AfterActivitiesDeleted イベントが発生します // //---------------------------------------------------------------------------------------------------- // 各アクティビティ コレクションのカウントを取得します int appointmentCount = this.ultraMonthViewSingle1.CalendarInfo.Appointments.Count; int noteCount = this.ultraMonthViewSingle1.CalendarInfo.Notes.Count; // 新しいカウントの情報を含む MessageBox を表示します string info = string.Empty; info += "There are currently " + appointmentCount.ToString() + " Appointment(s), "; info += "and " + noteCount.ToString() + " Note(s) remaining."; MessageBox.Show( info, "AfterActivitiesDeleted", MessageBoxButtons.OK ); }