pb中使用 声明： function long MyFormatLunarYear(long iYear,ref string text) library "calendar.dll" function long MyGetLunarDate(long iYear, long iMonth, long iDay, ref long iLunarYear, ref long iLunarMonth, ref long iLunarDay) library "calendar.dll" function long getjieqi(long iYear, long iMonth, long i