Imports GrapeCity.Web.Input.IMCalendar
' 休日スタイルを生成します。
Dim aHS As HolidayStyle = New HolidayStyle()
' 休日スタイルの名称を設定します。
aHS.Name = "休業日"
' 第2と第4土曜日を休業日に設定します。
aHS.Holidays.Weekdays.Saturday = New DayOfWeekHolidayPolicy(WeekFlags.SecondWeek Or WeekFlags.FourthWeek, HolidayOverride.None)
' 休業日の表示スタイルを設定します。
GcCalendar1.Weekdays.Saturday.SubStyle = New SubStyle(Color.WhiteSmoke, Color.Red, True, False)
GcCalendar1.Weekdays.Saturday.WeekFlags = WeekFlags.SecondWeek Or WeekFlags.FourthWeek
' 設定が完了した休日スタイルを登録します。
GcCalendar1.HolidayStyles.Add("休業日", aHS)
' 登録した休日スタイルをコントロールに反映させます。
GcCalendar1.ActiveHolidayStyles = New String(){"休業日"}
using GrapeCity.Web.Input.IMCalendar;
// 休日スタイルを生成します。
HolidayStyle aHS = new HolidayStyle();
// 休日スタイルの名称を設定します。
aHS.Name = "休業日";
// 第2と第4土曜日を休業日に設定します。
aHS.Holidays.Weekdays.Saturday = new DayOfWeekHolidayPolicy(WeekFlags.SecondWeek | WeekFlags.FourthWeek, HolidayOverride.None);
// 休業日の表示スタイルを設定します。
GcCalendar1.Weekdays.Saturday.SubStyle = new SubStyle(Color.WhiteSmoke, Color.Red, true, false);
GcCalendar1.Weekdays.Saturday.WeekFlags = WeekFlags.SecondWeek | WeekFlags.FourthWeek;
// 設定が完了した休日スタイルを登録します。
GcCalendar1.HolidayStyles.Add("休業日", aHS);
// 登録した休日スタイルをコントロールに反映させます。
GcCalendar1.ActiveHolidayStyles = new string[]{"休業日"};