拓文网络 → .NET编程 → ASP.NET - 阴历阳历转换［正文］


		《拓文asp.net网站内容管理系统》官方演示站。	设为首页
			收藏本站
			作者：黄振安
			ＱＱ：53854651

站内搜索：

您现在的位置：拓文网络 → .NET编程 → ASP.NET → 阴历阳历转换［正文］

热门文章

ASP.NET性能优化

在.NET框架应用程序中发送电子邮件

.net打包自动安装数据库

asp.net开发wap必备：更好的匹配手机设备

用ashx动态生成文件

windows 2003下asp.Net站点无法使用用户名＋密码的方

ASP.NET中17种正则表达式

提高ASP.Net应用程序性能的十大方法

一个通过web.Mail发送邮件的类

在DataGrid里面根据日期的不同显示new图标

阴历阳历转换

［作者：不详转贴自：不详点击数：更新时间：2006-4-6 16:00:43］

            public string FormatLunarDay(ushort iDay)
            {
                string szText1 = "初十廿三";
                string szText2 = "一二三四五六七八九十";
                string strDay;
                if ((iDay != 20) && (iDay != 30))
                {
                    strDay = szText1.Substring((iDay - 1) / 10, 1);
                    strDay = strDay + szText2.Substring((iDay - 1) % 10, 1);
                }
                else
                {
                    //strDay = szText1.Substring((iDay / 10) * 2 + 1, 2);
                    strDay = szText1.Substring((iDay / 10) , 1);
                    strDay = strDay + "十";
                }
                return strDay;
            }

            public string GetLunarHolDay()
            {
                ushort iYear, iMonth, iDay;
                int i;
                TimeSpan ts;
                iYear = (ushort)(m_Date.Year);
                if ((iYear < START_YEAR) || (iYear > END_YEAR))
                { return "";};
                i = l_GetLunarHolDay();
                if ((i >= 0) && (i <= 23))
                { return LunarHolDayName[i];}
                else
                {
                    ts = m_Date - (new DateTime(START_YEAR, 1, 1));
                    l_CalcLunarDate(out iYear, out iMonth, out iDay, (uint)(ts.Days));
                    return FormatMonth(iMonth, true) + FormatLunarDay(iDay);
                }
            }

            //返回阴历iLunarYear年的闰月月份，如没有返回0 1901年1月---2050年12月
            public int GetLeapMonth(ushort iLunarYear)
            {
                byte Flag;
                if ((iLunarYear < START_YEAR) || (iLunarYear > END_YEAR))
                { return 0;};
                Flag = gLunarMonth[(iLunarYear - START_YEAR) / 2];
                if ((iLunarYear - START_YEAR) % 2 == 0)
                {return Flag >> 4;}
                else
                {return Flag & 0x0F;}
            }

            //返回阴历iLunarYer年阴历iLunarMonth月的天数，如果iLunarMonth为闰月，
            //高字为第二个iLunarMonth月的天数，否则高字为0 1901年1月---2050年12月
            public uint LunarMonthDays(ushort iLunarYear, ushort iLunarMonth)
            {
                int Height, Low;
                int iBit;
                if ((iLunarYear < START_YEAR) || (iLunarYear > END_YEAR))
                { return 30; }
                Height = 0;
                Low = 29;
                iBit = 16 - iLunarMonth;
                if ((iLunarMonth > GetLeapMonth(iLunarYear)) && (GetLeapMonth(iLunarYear) > 0))
                {iBit--;}
                if ((gLunarMonthDay[iLunarYear - START_YEAR] & (1 << iBit)) > 0)
                {Low++;}
                if (iLunarMonth == GetLeapMonth(iLunarYear))
                {
                    if ((gLunarMonthDay[iLunarYear - START_YEAR] & (1 << (iBit-1)))>0)
                    {Height = 30;}
                    else
                    {Height = 29;}
                }
                return (uint)((uint)(Low)|(uint)(Height)<<16); //合成为uint
            }

首页 | 1 | 2 | 3 | 4 | 5 | 6 | 尾页共 6 页

winner

打印本页

关闭窗口

文章评论

	评论人	查看该文章的评论	发表时间
笔名* ： 0 50分 60分 70分 80分 90分 100分评论内容 *：（最多1000字。当前字数：0）
没有相关评论，欢迎您参与！