diff options
Diffstat (limited to 'wizards/source/schedule/LocalHolidays.xba')
-rw-r--r-- | wizards/source/schedule/LocalHolidays.xba | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/wizards/source/schedule/LocalHolidays.xba b/wizards/source/schedule/LocalHolidays.xba index 8ee71b1e3446..44ed0bb272ec 100644 --- a/wizards/source/schedule/LocalHolidays.xba +++ b/wizards/source/schedule/LocalHolidays.xba @@ -474,13 +474,16 @@ Dim lDate as Long End Select Select Case sCurCountryLocale Case "CN" - CalInsertBankholiday(lDate-1, "春节", cHolidayType_Full) - CalInsertBankholiday(lDate, "春节", cHolidayType_Full) - CalInsertBankholiday(lDate+1, "春节", cHolidayType_Full) + CalInsertBankholiday(lDate-1, "农历除夕", cHolidayType_Full) + CalInsertBankholiday(lDate, "春节初一", cHolidayType_Full) + CalInsertBankholiday(lDate+1, "春节初二", cHolidayType_Full) + CalInsertBankholiday(lDate+2, "春节初三", cHolidayType_Full) + Case Else CalInsertBankholiday(lDate-1, "農曆除夕", cHolidayType_Full) - CalInsertBankholiday(lDate, "道教節", cHolidayType_Full) - CalInsertBankholiday(lDate+1, "春節", cHolidayType_Full) + CalInsertBankholiday(lDate, "春節初一", cHolidayType_Full) + CalInsertBankholiday(lDate+1, "春節初二", cHolidayType_Full) + CalInsertBankholiday(lDate+2, "春節初三", cHolidayType_Full) End Select End Sub |