一个阴历阳历互相转化的类（c#源码）
最近郁闷地发现网上现有的相当一部分万年历上干支纪年的算法都是错误的。因为干支纪年是针对阴历而言的，而生肖属相又跟地支对应，所以元旦和春节之间那段 时间在干支纪年法中应该归上一年，以阳历2007年2月9日为例，当日的阴历日期是二〇〇六年十二月廿二日，是丙戌年，即狗年，但是浏览一下目前的万年 历，相当一部分都显示成了丁亥年，猪年，比较郁闷～～
然后就写了一个阴历阳历互相转化的类。
相关代码如下：
using System;
using System.Collections.Generic;
using System.Text;
using System.Text.RegularExpressions;
using System.Globalization;
namespace ChineseCalendar
{
/// <summary>
/// 中国日历信息实体类
/// cncxz（虫虫） 2007-2-9
/// </summary>
public sealed class ChineseCalendarInfo
{
private DateTime m_SolarDate;
private int m_LunarYear, m_LunarMonth, m_LunarDay;
private bool m_IsLeapMonth = false;
private string m_LunarYearSexagenary = null, m_LunarYearAnimal = null;
private string m_LunarYearText = null, m_LunarMonthText = null, m_LunarDayText = null;
private string m_SolarWeekText = null, m_SolarConstellation = null, m_SolarBirthStone = null;
#region 构造函数
public ChineseCalendarInfo()
: this(DateTime.Now.Date)
{
}
/// <summary>
/// 从指定的阳历日期创建中国日历信息实体类
/// </summary>
/// <param name="date">指定的阳历日期</param>
public ChineseCalendarInfo(DateTime date)
{
m_SolarDate = date;
LoadFromSolarDate();
}
private void LoadFromSolarDate()
{
m_IsLeapMonth = false;
m_LunarYearSexagenary = null;
m_LunarYearAnimal = null;
m_LunarYearText = null;
m_LunarMonthText = null;
m_LunarDayText = null;
m_SolarWeekText = null;
m_SolarConstellation = null;
m_SolarBirthStone = null;
m_LunarYear = calendar.GetYear(m_SolarDate);
m_LunarMonth = calendar.GetMonth(m_SolarDate);
int leapMonth = calendar.GetLeapMonth(m_LunarYear);
if (leapMonth == m_LunarMonth)
{
m_IsLeapMonth = true;
m_LunarMonth -= 1;
}
else if (leapMonth > 0 && leapMonth < m_LunarMonth)
{
m_LunarMonth -= 1;
}
m_LunarDay = calendar.GetDayOfMonth(m_SolarDate);
CalcConstellation(m_SolarDate, out m_SolarConstellation, out m_SolarBirthStone);
}
#endregion
#region 日历属性
/// <summary>
/// 阳历日期
/// </summary>
public DateTime SolarDate
{
get { return m_SolarDate; }
set
{
if (m_SolarDate.Equals(value))
return;
m_SolarDate = value;
LoadFromSolarDate();
}
}
/// <summary>
/// 星期几
/// </summary>
public string SolarWeekText
{
get
{
if (string.IsNullOrEmpty(m_SolarWeekText))
{
int i = (int)m_SolarDate.DayOfWeek;
m_SolarWeekText = ChineseWeekName[i];
}
return m_SolarWeekText;
}
}
/// <summary>
/// 阳历星座
/// </summary>
public string SolarConstellation
{
get { return m_SolarConstellation; }
}
/// <summary>
/// 阳历诞生石
/// </summary>
public string SolarBirthStone
{
get { return m_SolarBirthStone; }
}
/// <summary>
/// 阴历年份
/// </summary>
public int LunarYear
{
get { return m_LunarYear; }
}
/// <summary>
/// 阴历月份
/// </summary>
public int LunarMonth
{
get { return m_LunarMonth; }
}
/// <summary>
/// 是否阴历闰月
/// </summary>
public bool IsLeapMonth
{
get { return m_IsLeapMonth; }
}
/// <summary>
/// 阴历月中日期
/// </summary>
public int LunarDay
{
get { return m_LunarDay; }
}
/// <summary>
/// 阴历年干支
/// </summary>
public string LunarYearSexagenary
{
get
{
if (string.IsNullOrEmpty(m_LunarYearSexagenary))
{
int y = calendar.GetSexagenaryYear(this.SolarDate);
m_LunarYearSexagenary = CelestialStem.Substring((y - 1) % 10, 1) + TerrestrialBranch.Substring((y - 1) % 12, 1);
}
return m_LunarYearSexagenary;
}
}
/// <summary>
/// 阴历年生肖
/// </summary>
public string LunarYearAnimal
{
get
{
if (string.IsNullOrEmpty(m_LunarYearAnimal))
{
int y = calendar.GetSexagenaryYear(this.SolarDate);
m_LunarYearAnimal = Animals.Substring((y - 1) % 12, 1);
}
return m_LunarYearAnimal;
}
}
/// <summary>
/// 阴历年文本
/// </summary>
public string LunarYearText
{
get
{
if (string.IsNullOrEmpty(m_LunarYearText))
{
m_LunarYearText = Animals.Substring(calendar.GetSexagenaryYear(new DateTime(m_LunarYear, 1, 1)) % 12 - 1, 1);
StringBuilder sb = new StringBuilder();
int year = this.LunarYear;
int d;
do
{
d = year % 10;
sb.Insert(0, ChineseNumber[d]);
year = year / 10;
} while (year > 0);
m_LunarYearText = sb.ToString();
}
return m_LunarYearText;
}
}
/// <summary>
/// 阴历月文本
/// </summary>
public string LunarMonthText
{
get
{
if (string.IsNullOrEmpty(m_LunarMonthText))
{
m_LunarMonthText = (this.IsLeapMonth ? "闰" : "") + ChineseMonthName[this.LunarMonth - 1];
}
return m_LunarMonthText;
}
}
/// <summary>
/// 阴历月中日期文本
/// </summary>
public string LunarDayText
{
get
{
if (string.IsNullOrEmpty(m_LunarDayText))
m_LunarDayText = ChineseDayName[this.LunarDay - 1];
return m_LunarDayText;
}
}
#endregion
/// <summary>
/// 根据指定阳历日期计算星座＆诞生石
/// </summary>
/// <param name="date">指定阳历日期</param>
/// <param name="constellation">星座</param>
/// <param name="birthstone">诞生石</param>
public static void CalcConstellation(DateTime date, out string constellation, out string birthstone)
{
int i = Convert.ToInt32(date.ToString("MMdd"));
int j;
if (i >= 321 && i <= 419)
j = 0;
else if (i >= 420 && i <= 520)
j = 1;
else if (i >= 521 && i <= 621)
j = 2;
else if (i >= 622 && i <= 722)
j = 3;
else if (i >= 723 && i <= 822)
j = 4;
else if (i >= 823 && i <= 922)
j = 5;
else if (i >= 923 && i <= 1023)
j = 6;
else if (i >= 1024 && i <= 1121)
j = 7;
else if (i >= 1122 && i <= 1221)
j = 8;
else if (i >= 1222 || i <= 119)
j = 9;
else if (i >= 120 && i <= 218)
j = 10;
else if (i >= 219 && i <= 320)
j = 11;
else
{
constellation = "未知星座";
birthstone = "未知诞生石";
return;
}
constellation = Constellations[j];
birthstone = BirthStones[j];
#region 星座划分
//白羊座： 3月21日------4月19日 诞生石： 钻石
//金牛座： 4月20日------5月20日 诞生石： 蓝宝石
//双子座： 5月21日------6月21日 诞生石： 玛瑙
//巨蟹座： 6月22日------7月22日 诞生石： 珍珠
//狮子座： 7月23日------8月22日 诞生石： 红宝石
//处女座： 8月23日------9月22日 诞生石： 红条纹玛瑙
//天秤座： 9月23日------10月23日 诞生石： 蓝宝石
//天蝎座： 10月24日-----11月21日 诞生石： 猫眼石
//射手座： 11月22日-----12月21日 诞生石： 黄宝石
//摩羯座： 12月22日-----1月19日 诞生石： 土耳其玉
//水瓶座： 1月20日-----2月18日 诞生石： 紫水晶
//双鱼座： 2月19日------3月20日 诞生石： 月长石，血石
#endregion
}
#region 阴历转阳历
/// <summary>
/// 获取指定年份春节当日（正月初一）的阳历日期
/// </summary>
/// <param name="year">指定的年份</param>
private static DateTime GetLunarNewYearDate(int year)
{
DateTime dt = new DateTime(year, 1, 1);
int cnYear = calendar.GetYear(dt);
int cnMonth = calendar.GetMonth(dt);
int num1 = 0;
int num2 = calendar.IsLeapYear(cnYear) ? 13 : 12;
while (num2 >= cnMonth)
{
num1 += calendar.GetDaysInMonth(cnYear, num2--);
}
num1 = num1 - calendar.GetDayOfMonth(dt) + 1;
return dt.AddDays(num1);
}
/// <summary>
/// 阴历转阳历
/// </summary>
/// <param name="year">阴历年</param>
/// <param name="month">阴历月</param>
/// <param name="day">阴历日</param>
/// <param name="IsLeapMonth">是否闰月</param>
public static DateTime GetDateFromLunarDate(int year, int month, int day, bool IsLeapMonth)
{
if (year < 1902 || year > 2100)
throw new Exception("只支持1902～2100期间的农历年");
if (month < 1 || month > 12)
throw new Exception("表示月份的数字必须在1～12之间");
if (day < 1 || day > calendar.GetDaysInMonth(year, month))
throw new Exception("农历日期输入有误");
int num1 = 0, num2 = 0;
int leapMonth = calendar.GetLeapMonth(year);
if (((leapMonth == month + 1) && IsLeapMonth) || (leapMonth > 0 && leapMonth <= month))
num2 = month;
else
num2 = month - 1;
while (num2 > 0)
{
num1 += calendar.GetDaysInMonth(year, num2--);
}
DateTime dt = GetLunarNewYearDate(year);
return dt.AddDays(num1 + day - 1);
}
/// <summary>
/// 阴历转阳历
/// </summary>
/// <param name="date">阴历日期</param>
/// <param name="IsLeapMonth">是否闰月</param>
public static DateTime GetDateFromLunarDate(DateTime date, bool IsLeapMonth)
{
return GetDateFromLunarDate(date.Year, date.Month, date.Day, IsLeapMonth);
}
#endregion
#region 从阴历创建日历
/// <summary>
/// 从阴历创建日历实体
/// </summary>
/// <param name="year">阴历年</param>
/// <param name="month">阴历月</param>
/// <param name="day">阴历日</param>
/// <param name="IsLeapMonth">是否闰月</param>
public static ChineseCalendarInfo FromLunarDate(int year, int month, int day, bool IsLeapMonth)
{
DateTime dt = GetDateFromLunarDate(year, month, day, IsLeapMonth);
return new ChineseCalendarInfo(dt);
}
/// <summary>
/// 从阴历创建日历实体
/// </summary>
/// <param name="date">阴历日期</param>
/// <param name="IsLeapMonth">是否闰月</param>
public static ChineseCalendarInfo FromLunarDate(DateTime date, bool IsLeapMonth)
{
return FromLunarDate(date.Year, date.Month, date.Day, IsLeapMonth);
}
/// <summary>
/// 从阴历创建日历实体
/// </summary>
/// <param name="date">表示阴历日期的8位数字，例如：20070209</param>
/// <param name="IsLeapMonth">是否闰月</param>
public static ChineseCalendarInfo FromLunarDate(string date, bool IsLeapMonth)
{
Regex rg = new System.Text.RegularExpressions.Regex(@"^/d{7}(/d)$");
Match mc = rg.Match(date);
if (!mc.Success)
{
throw new Exception("日期字符串输入有误！");
}
DateTime dt = DateTime.Parse(string.Format("{0}-{1}-{2}", date.Substring(0, 4), date.Substring(4, 2), date.Substring(6, 2)));
return FromLunarDate(dt, IsLeapMonth);
}
#endregion
private static ChineseLunisolarCalendar calendar = new ChineseLunisolarCalendar();
public const string ChineseNumber = "〇一二三四五六七八九";
public const string CelestialStem = "甲乙丙丁戊己庚辛壬癸";
public const string TerrestrialBranch = "子丑寅卯辰巳午未申酉戌亥";
public const string Animals = "鼠牛虎兔龙蛇马羊猴鸡狗猪";
public static readonly string[] ChineseWeekName = new string[] { "星期天", "星期一", "星期二", "星期三", "星期四", "星期五", "星期六" };
public static readonly string[] ChineseDayName = new string[] {
"初一","初二","初三","初四","初五","初六","初七","初八","初九","初十",
"十一","十二","十三","十四","十五","十六","十七","十八","十九","二十",
"廿一","廿二","廿三","廿四","廿五","廿六","廿七","廿八","廿九","三十"};
public static readonly string[] ChineseMonthName = new string[] { "正", "二", "三", "四", "五", "六", "七", "八", "九", "十", "十一", "十二" };
public static readonly string[] Constellations = new string[] { "白羊座", "金牛座", "双子座", "巨蟹座", "狮子座", "处女座", "天秤座", "天蝎座", "射手座", "摩羯座", "水瓶座", "双鱼座" };
public static readonly string[] BirthStones = new string[] { "钻石", "蓝宝石", "玛瑙", "珍珠", "红宝石", "红条纹玛瑙", "蓝宝石", "猫眼石", "黄宝石", "土耳其玉", "紫水晶", "月长石，血石" };
}
}
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
namespace ChineseCalendar
{
public partial class frmQuery : Form
{
public frmQuery()
{
InitializeComponent();
}
private void btnLunar_Click(object sender, EventArgs e)
{
try
{
int year = int.Parse(txtYear.Text.Trim());
int month = int.Parse(txtMonth.Text.Trim());
int day = int.Parse(txtDay.Text.Trim());
ChineseCalendarInfo ccInfo = ChineseCalendarInfo.FromLunarDate(year, month, day, chkIsLeap.Checked);
txtResult.Text = GetInfoFromChineseCalendarInfo(ccInfo);
}
catch (Exception ex)
{
txtResult.Text = ex.Message;
}
}
private void btnSolar_Click(object sender, EventArgs e)
{
try
{
ChineseCalendarInfo ccInfo = new ChineseCalendarInfo(dtPicker.Value);
txtResult.Text = GetInfoFromChineseCalendarInfo(ccInfo);
}
catch (Exception ex)
{
txtResult.Text = ex.Message;
}
}
private string GetInfoFromChineseCalendarInfo(ChineseCalendarInfo ccInfo)
{
StringBuilder sb = new StringBuilder();
sb.Append(string.Format("============= {0} =============/r/n/r/n", DateTime.Now.ToString()));
sb.Append(string.Format("阳历日期：{0}（{1}）/r/n/r/n", ccInfo.SolarDate.ToString("yyyy-MM-dd"),ccInfo.SolarWeekText));
sb.Append(string.Format("星座：{0}/r/n/r/n", ccInfo.SolarConstellation));
sb.Append(string.Format("诞生石：{0}/r/n/r/n", ccInfo.SolarBirthStone));
sb.Append(string.Format("阴历日期：{0}年{1}月{2}日/r/n/r/n", ccInfo.LunarYearText, ccInfo.LunarMonthText, ccInfo.LunarDayText));
sb.Append(string.Format("生肖属相：{0}/r/n/r/n", ccInfo.LunarYearAnimal));
sb.Append(string.Format("干支纪年：{0}", ccInfo.LunarYearSexagenary));
return sb.ToString();
}
}
}
工程文件下载：http://www.cnblogs.com/Files/cncxz/ChineseCalendar.rar