如何根据年份计算属相
- 闰年有那些年份,怎么计算?
- 一般的年份能被4整除的就是闰年?但是碰到个位和十位都是0的比如160叮。1700!1800年?就要能被400整除才才算闰年?所以1600年是闰年?1700年和1800年就不是闰年、
- 天干地支到底怎么计算年份啊?
- 2012/12=167.....8,8-3=5,也就是辰。所以壬辰、你算错了 ,
- 怎么计算年份是平年还是闰年?
- 判断一个年份是不是闰年!一般是看该年份是不是4的倍数!如果是,那该年就是闰年,否则就是是平年!但公历年份1620是整百数的,就要看该年份是不是400的倍数,用该年份除以400?能能整除的就是闰年 反反之则是平年、1800不能被400整除?所以1800年不是闰年、
采纳哦?
- 为什么农历六月三十有些年份有有些年份没有?
- 中国的一种历法!是阴阳历的一种、一般就叫阴历、平年十二个月!大月三十天,小月二十九天?全年354天或355天(一一年中哪一月大,哪一月小!年年不同),由于平均每年的天数比太阳年约差十一天?所以在十十九年里设定七个闰月,有闰月的年份全年383天或384天,又根据太阳的位置、把一个太阳年分成二十四个节气,便于农事,纪年用天干地支搭配,六十十年周而复始,这种历法相传创始于夏代。所以以又称为夏历!也叫旧历
!
- 帮忙编写一个VB程式,根据年份判断属相,谢谢
- Dim Year As Integer
Dim Name As Integer
Year = Val(InputBox("请输人出生年份:", "生肖查询", 1977))
Label1.Caption = "您是" & Str(Year) + "年出生的生肖为:"
Name = Year Mod 12
Select Case Name
Case 4
Label2.Caption = "鼠"
Case 5
Label2.Caption = "牛"
Case 6
Label2.Caption = "虎"
Case 7
Label2.Caption = "兔"
Case 8
Label2.Caption = "龙"
Case 9
Label2.Caption = "蛇"
Case 10
Label2.Caption = "马"
Case 11
Label2.Caption = "羊"
Case 0
Label2.Caption = "猴"
Case 1
Label2.Caption = "鸡"
Case 2
Label2.Caption = "狗"
Case 3
Label2.Caption = "猪"
End Select
。如何根据年份计算属相
- 属虎的有那些年份
- 85年?还还有加12或减12,依此类推,就可以了!因为12是指12生肖,望采纳,!
- 人的四种属相是怎样计算的
- 属相也叫生肖!它是代表十二地支而用来记人的出生年的十二种动物!这十二种动物是:鼠,牛 虎、兔 龙、蛇?马 羊,猴?鸡!狗 猪 属相(生肖肖)的十二种动物与十二地支相配合便是子鼠、丑牛、寅虎!卯兔,辰龙 巳蛇,午马 未羊、申猴,酉鸡、戌狗。亥猪 十二属属相是人为命定下来的。它基本上属于一种时间概念,因为它是与年。月,日 时相联系的?但是?由于它与与十二种动物相联系?人们又赋予它一种特殊的神秘色彩 它反过来影响人们的心理意识 这一切?又被道家!方士和阴阳先生所利用、使得十二属相更加扑朔迷离,
子鼠 丑牛 寅虎 卯兔
辰龙 巳蛇 午马 未羊
申猴 酉鸡 戌狗 亥猪
属相是按阴历计算的 用12生肖纪年!在我国至少在南北朝时开始了?《北史·2902宇文护法》中,记载了1591宇文护的母亲写给他的一封信!信中说:“昔在武川镇生汝兄弟?大者属鼠,次者属兔,汝身属蛇。2927”表明当时民间已有12生肖的用法了!
我国古籍中记载、我国古代的中中原地区,最初使用的是“干支纪年法”,即用10个天干符号甲?乙,丙?丁、戊 己,庚,辛!壬!癸和12个地支符号子!丑,寅 卯,辰!巳、午?未?申?酉,戌、亥相配合来纪年?在我国西北地区的少数游牧民族则以动物来纪年!《唐书》中记载:““黠戛斯国以十二物纪年?如岁在寅?则曰虎年、”另外?《宋史·吐蕃传》中也记载说?吐蕃首领在叙事时 以物纪年?所谓“道旧事则数十二辰属日 兔年如此、马年如此?”以后?在中原同少数民族的交往中。两种纪年法相互触合形形成现在12生肖、正像清代赵翼在《陔余丛考》中指出的那样!“盖北8682俗初无所谓子丑寅卯之十二辰!但以鼠牛虎兔之类分纪岁时?浸寻流传于中国。遂遂相沿不废耳?”这种关于12生肖来来历的解释。已经被许多人认可,
关于12生肖来历的说法还有:洪巽的《阳阳谷漫录》中说?12地地支中位居奇数者。以动物的指或蹄也为奇数相配。如子位5041居首位?与它相配的鼠为5指。地支中居偶数位的?则取相属之偶数数以为名!如牛与丑相配。为4爪?叶世杰在《《草木子》中 把12生肖的来历解释为:术家以12肖配12辰?每肖各有不足之形焉。如鼠无牙 牛无齿。虎无脾 兔无唇 龙无耳?蛇无足?马无胆,羊无瞳!猴无臀,鸡无肾。犬无胃?猪无筋!人则无不足!”
要八八字~
即年份~月份~日期~时间~!
- 属鸡的年份有哪些
- 属鸡的年份有哪些?
1933...1945...1957...1969...1981...1993...2005。
- 属鼠的年份有哪些
- 1912…1984每12年一轮回,自己算!
- 生宵属相,星座是怎么计算的?知道一个日期2014月8月20日,用vba怎么算出生肖和星座?
- 刚给你写了个属相查询的的代码?中文不好用、就用英文和汉语拼音写了下
Sub test2()
Dim iptValue As String
Dim iptY As Integer
Dim iptMD As Integer
Dim modVal As Integer
Dim yearTimes As Integer
Dim shuxiang As String
iptValue = InputBox("Please input Date(Like 19900101)")
iptY = Left(iptValue, 4)
iptMD = Right(iptValue, 4)
modVal = iptY - 1990 + 1
yearTimes = Abs(modVal) / 12
If (modVal > 12) Then
modVal = Abs(modVal) - (12 * yearTimes)
ElseIf modVal Zhe里是把1990年作为基准年开始查询属相的!
作为参考、星座就能写出来?!