Popup Calendar

[Guest]

I am using Allen Browne's Popup Calendar found at:
http://allenbrowne.com/ser-51.html
It is great but I would like to "hide" the Weekends. In the documentation
it says to

** To use a different color for Saturdays and Sundays, change the line:
** Private Const lngcWeekendForeColor = 192&
** to a different RGB value or color name, such as:
*** Private Const lngcWeekendForeColor = vbBlack

I cannot find this line in the code so I put them behind the Option
Explicit. I cannot get this to work. I put it in both the abjCalendar and
the frmCalendar(on open) and nothing happens.

Actually I think the users really want me to capture the date and send them
a message box that they have chosen a weekend. Maybe that is what I should
do but I thought hiding the weekends (color to the form color of -2147483633)
would be easier then having to deal with the msgboxes.

tia

Vanya

 

[Allen Browne]

The declaration is in the module for frmCalendar.

You could hide them by setting the Visible property to No for each label in
the first column and last column on the form.

Or you could leave them operational but not obvious by setting the fore
color to the same as the background color of the detail section of the
calendar form, e.g.:
Private Const lngcWeekendForeColor = vbWhite

 

[Guest]

Allen,

Thanks. I change the Visible property as I couldn't seem to make the
Private Const lngcWeekendForeColor
work at all.