我这里刚好有这个算法代码，请看： 　　var LunarDate = { madd: new Array(0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334), HsString: '甲乙丙丁戊己庚辛壬癸', EbString: '子丑寅卯辰巳午未申酉戌亥', NumString: "一二三四五六七八九十", MonString: "正二三四五六七八九十冬腊", CalendarData: new Array(0xA4B, 0x5164B, 0x6A5, 0x6D4, 0x415B5, 0x2B6, 0x957, 0x2092F, 0x497, 0x60C96, 0xD4A, 0xEA5, 0x50DA9, 0x5AD, 0x2B6, 0x3126E, 0x92E, 0x7192D, 0xC95, 0xD4A, 0x61B4A, 0xB55, 0x56A, 0x4155B, 0x25D, 0x92D, 0x2192B, 0xA95, 0x71695, 0x6CA, 0xB55, 0x50AB5, 0x4DA, 0xA5B, 0x30A57, 0x52B, 0x8152A, 0xE95, 0x6AA, 0x615AA, 0xAB5, 0x4B6, 0x414AE, 0xA57, 0x526, 0x31D26, 0xD95, 0x70B55, 0x56A, 0x96D, 0x5095D, 0x4AD, 0xA4D, 0x41A4D, 0xD25, 0x81AA5, 0xB54, 0xB6A, 0x612DA, 0x95B, 0x49B, 0x41497, 0xA4B, 0xA164B, 0x6A5, 0x6D4, 0x615B4, 0xAB6, 0x957, 0x5092F, 0x497, 0x64B, 0x30D4A, 0xEA5, 0x80D65, 0x5AC, 0xAB6, 0x5126D, 0x92E, 0xC96, 0x41A95, 0xD4A, 0xDA5, 0x20B55, 0x56A, 0x7155B, 0x25D, 0x92D, 0x5192B, 0xA95, 0xB4A, 0x416AA, 0xAD5, 0x90AB5, 0x4BA, 0xA5B, 0x60A57, 0x52B, 0xA93, 0x40E95), Year: null, Month: null, Day: null, TheDate: null, GetBit: function(m, n){ return (m >> n) & 1; }, e2c: function(){ this.TheDate = (arguments.length != 3) ? new Date(): new Date(arguments[0], arguments[1], arguments[2]); var total, m, n, k; var isEnd = false; var tmp = this.TheDate.getFullYear(); total = (tmp - 1921) * 365 + Math.floor(乏鼎催刮诎......余下全文>>。

¹⁶⁷⁴　　这个转不了 每年的阴历日子跟阳历都是不同的 只能看阳历或者阴历的日子？那有风水大师

下面是一个关于VB的农历演算法 '日期资料定义方法如下 '前12个位元组代表1-12月为大月或是小月！1为大月30天，0为小月29天， '第13位为闰月的情况、1为大月30天。0为小月29天。 '第14位为闰月的月份、如果不是闰月为0，否则给出月份。10，11，12分别用A，B、C来表示！即使用16⁹⁵⁸³进位制？ '最后4位为当年家农历新年-即农历1月1日所在公历的日期！如0131代表1月31日! Function GetChgDate(ByVal vDate As String, ByVal ChgType As 转换方式) As String Dim vvdate() As String = Split(vDate, "-") If vvdate(0) > 2011 Or vvdate(0) < 1900 Then Throw New NotSupportedException("本函式只提供1900年至2011年的日历转换！") End If Dim AddMonth, AddDay, AddYear, getDay, i As Integer Dim RunYue As Boolean Dim conDate As DateTime Dim daList(2011) As String daList(1900) = "010010110110180131" daList(1901) = "010010101110000219" daList(1902) = "101001010111000208" daList(1903) = "010100100110150129" daList(1904) = "110100100110000216" daList(1905) = "110110010101000204" daList(1906) = "011010101010140125" daList(1907) = "010101101010000213" daList(1908) = "100110101101000202" daList(1909) = "010010101110120122" daList(1910) = "010010101110000210" daList(1911) = "101001001101160130" daList(1912) = "101001001101000218" daList(1913) = "110100100101000206" daList(1914) = "110101010100150126" daList(1915) = "101101010101000214" daList(1916) = "010101101010000204" daList(1917) = "100101101101020123" daList(1918) = "100101011011......馀下全文>> ，那样的风水会出寡妇

　　YY呀！那派风水最科学

　　我7月27阳历9月9。那种八卦镜好

　　身身份证的生日？没有严格规定、这主要看提报户口时，用的2396哪个生日，不过。无论是^哪哪一个、¹⁰⁶⁰都是按阳历计时法的？也就是说、身份证上的生日！是没有润月一说的，（只有阴历才有润月）、而且12月。也不写成腊月，所以。也可以说！是阳历的、。那种女人面相容易出轨

　　身份证上出生日期应该是阳历（即公历）。 　　根据公安部颁布的《户籍管理办法》规定：我国公民的户籍资料和身份证件都必须使用公元日期，^可可是由于我国民俗是过农历生日，有些偏远地区乡镇基层在开具出生证时应家属之请使用农历日期、导致公安机关进行户籍登记时把出生日期登登记为农历日期! 　　后来还曾经发文强调“对于在进行户籍登记时使用农历日期的不规范行为必须及时纠正。”所以，现在无论你在申领身份证时使用的是农历还是阳历。官方一律按阳历认定！ 　　，那种客厅需要摆放玄关

　　中华人民共和国法法定使用的历法是公历,也就是常说的阳历。因此。身份证上的出生日期是阳历。医院出具的出生日0396期证明也是阳历！凡是具有法律效力的公文、证明明都使用阳历？！那种属相不适合养鱼

　　　一般来说,每个人的19，38，57。76和95岁的生日中、总有几次阳历和阴历是同一天的，但并不是每个人的194668岁生日都是阳历阴历同一天。 　　凡在阳历1984年11月23日至1985年4月19日之间出生的人。他们的一生从没有一次生日是阳历阴历同一天！这异常情况并不常见，却正跟闰月并不每19年出现的异常情况有关、。那种户型风水不好阳历转阴历生日转换器

　　如果你又要过阴历生日又要过阳历生日。2011年阴历7月28日对上的阳历是8月27日。然后你再过郸月20号的生日。也就是说！你今今年阳历8月27和9月20过生日,能理解吗，、那种手相最有福气