How...?

In the sample the following code is found in IsEditOperationDisabled.  If just before you do the 'mnuNewEvent_Click' in the DblClick Event, you use this code, it will determine what day you clicked and you can react accordingly.         If DisableInPlaceCreateEvents_ForSaSu Then
            Dim dtBegin As Date, dtEnd As Date, bAllDay As Boolean
            Dim nSelDays As Long, nSelWDay As Long
                                  
            If CalendarControl.ActiveView.GetSelection(dtBegin, dtEnd, bAllDay) = False Then
                Exit Sub
            End If
           
            nSelDays = Abs(DateDiff("d", dtEnd, dtBegin))
            If dtBegin < dtEnd Then
                nSelWDay = Weekday(dtBegin)
            Else
                nSelWDay = Weekday(dtEnd)
            End If
           
            If bAllDay And nSelDays > 0 Then
                nSelDays = nSelDays - 1
            End If
           
            If nSelWDay = 1 Or (nSelWDay + nSelDays) >= 7 Then
                DisableOperation = True
            End If
 End If