CalendX6Mon - Examples Example 1 The following example selects the first three dates in July 2010. ' Turn on multiple selections mode CalendX6Mon.AllowMultiSelection = True ' Select 2010-07-01, set selection color to red CalendX6Mon.SetSelColor 2010, 7, 1, RGB(255, 0, 0) ' Select 2010-07-02, set selection color to red CalendX6Mon.SetSelColor 2010, 7, 2, RGB(255, 0, 0) ' Select 2010-07-03, set selection color to blue CalendX6Mon.SetSelColor 2010, 7, 3, RGB(0, 0, 255) Example 2 The following example sets the date color for the first two days in May 2010 to blue. CalendX6Mon.SetDateColor 2010, 5, 1, RGB(0, 0, 255) ' Change date color for 2010-05-01 CalendX6Mon.SetDateColor 2010, 5, 2, RGB(0, 0, 255) ' Change date color for 2010-05-02 Example 3 The following example loads an American country file to the calendar component. Dim bSt As Boolean bSt = CalendX6Mon.LoadCountryFile("C:\Program Files\SamLogic\SCC\CountryFiles\USA.cty") < Go back |