用VB语言编写输入出生日期算出生肖与星座的程序

用VB语言编写输入出生日期算出生肖与星座的程序,第1张

'新建窗体form1

'添加控件 DTPicker1,Command1

Private Sub Command1_Click()

Dim aa As Integer

Dim bb As Integer

Dim cc As Integer

Dim dd_xingzuo As Integer

Dim dd_shengxiao As Integer

Dim leirong As String

bb = DTPicker1Month

aa = DTPicker1Day

cc = DTPicker1Year

dd_xingzuo = (bb 100 + aa)

dd_shengxiao = cc Mod 12

If dd_xingzuo > 112 And dd_xingzuo < 221 Then

leirong = "星座:水瓶座"

End If

If dd_xingzuo >= 221 And dd_xingzuo <= 321 Then

leirong = "星座:双鱼座"

End If

If dd_xingzuo >= 322 And dd_xingzuo <= 420 Then

leirong = "星座:白羊座"

End If

If dd_xingzuo >= 421 And dd_xingzuo <= 521 Then

leirong = "星座:金牛座"

End If

If dd_xingzuo >= 522 And dd_xingzuo <= 621 Then

leirong = "星座:双子座"

End If

If dd_xingzuo >= 622 And dd_xingzuo <= 721 Then

leirong = "星座:巨蟹座"

End If

If dd_xingzuo >= 722 And dd_xingzuo <= 821 Then

leirong = "星座:狮子坐"

End If

If dd_xingzuo >= 822 And dd_xingzuo <= 921 Then

leirong = "星座:处女座"

End If

If dd_xingzuo >= 922 And dd_xingzuo <= 1021 Then

leirong = "星座:天秤座"

End If

If dd_xingzuo >= 1022 And dd_xingzuo <= 1121 Then

leirong = "星座:天蝎座"

End If

If dd_xingzuo >= 1122 And dd_xingzuo <= 1221 Then

leirong = "星座:射手座"

End If

If dd_xingzuo >= 1222 Or dd_xingzuo <= 111 Then

leirong = "星座:摩羯座"

End If

Select Case dd_shengxiao

Case 0

leirong = leirong & vbCrLf & "身肖:猴"

Case 1

leirong = leirong & vbCrLf & "身肖:鸡"

Case 2

leirong = leirong & vbCrLf & "身肖:狗"

Case 3

leirong = leirong & vbCrLf & "身肖:猪"

Case 4

leirong = leirong & vbCrLf & "身肖:鼠"

Case 5

leirong = leirong & vbCrLf & "身肖:牛"

Case 6

leirong = leirong & vbCrLf & "身肖:虎"

Case 7

leirong = leirong & vbCrLf & "身肖:兔"

Case 8

leirong = leirong & vbCrLf & "身肖:龙"

Case 9

leirong = leirong & vbCrLf & "身肖:蛇"

Case 10

leirong = leirong & vbCrLf & "身肖:马"

Case 11

leirong = leirong & vbCrLf & "身肖:羊"

End Select

MsgBox leirong, vbInformation, "计算结果"

End Sub

1计算方法:诞生年代除以12,取余数。如果能整除,余数视为零。

2按照下列数字表对应生肖动物:

0---猴    1---鸡   2---狗   3---猪

4---鼠    5---牛   6---虎   7---兔

8---龙    9---蛇   10---马   11---羊

此生肖对应表只适应于公元后的年代。

3如:鲁迅生于1881年,除以12,余数是9,亦属蛇。

4注:要按农历计算,而且不要使用计算器。

提起出生日期属相查询,大家都知道,有人问怎么算出生日期属相,另外,还有人想问如何根据出生日期如何精确计算属相?你知道这是怎么回事?其实十二生肖年龄查询,下面就一起来看看怎么算出生日期属相,希望能够帮助到大家!

出生日期属相查询

1、出生日期属相查询:怎么算出生日期属相

1、若说人的属相是什么,属相的算法是按农历的年份来说的,和月、日、时没有关系出生年月日和属相查询表。

2、比如:年立春之后出生的属相为羊,年农历立春之后出生的则属相为猴

3、而具体的每个月份、日子、时辰的干支是什么,则查日期就都可以知道

2、出生日期属相查询:如何根据出生日期如何计算属相?

只要找农历就可以了!

万年历,在最上面调整公历就可以显示出来当月的日期,你可以将鼠标指针放在万年历的公历日期上,可以看到准确的农历日期和属相。出生日期属什么生肖。

3、出生日期属相查询:十二生肖年龄查询

猴1羊2马3蛇4龙5兔6虎7牛8鼠9猪10狗11鸡12出生时辰属相查询。

星座网

星座生肖算命解梦风水黄历测试民俗姓名血型

星座十二生肖生肖表十二生肖查询。

年12生肖表,年十二生肖年龄(周岁)对照表月份属相查询。

/09/02星座网十二生肖年龄对照表。

年12生肖表,年十二生肖年龄(周岁)对照表

推荐阅读:

属鼠人年运程属牛人年运程

属虎人年运程属兔人年运程

属龙人年运程属蛇人年运程

属马人年运程属羊人年运程

属猴人年运程属鸡人年运程生肖查询计算器。

属狗人年运程属猪人年运程30天日子属相查询表。

注意事项:

1、下表中所说的年龄均为周岁。若查虚岁则根据表格加1即可。

2、此表于年使用。如果超过年,请关注星座网相关内容的更新。

3、十二生肖界限详细划分具体年份请查看[生肖日期]具体查询。生辰八字自查表。

4、此表于知道属相、出生年份、年龄的任意一项查询其余两项,如果仅知道出生年份查询生肖,除通过下表查询外,还可点击[年-年生肖查询表]查询生肖。出生日与属相对照表。

年生肖属相年份年龄(周岁)对照表

属相出生年份年龄相出生年份年龄相出生年份年龄牛寅兔辰午13申鸡戌十二生肖纪年对照表属相万年历属什么。

子丑寅卯辰巳午未申酉戌亥

鼠牛虎兔

你想查什么就直接搜索啊

4、出生日期属相查询:出生年月日属相查询年12月24日,年月日各属相是什么?

年12月24日星期二

农历十一月十三日戊子月摩羯座,你是牛年鼠月鸡日出生的。属相年龄对照表查询。

十二生肖年龄查询

5、出生日期属相查询:如何根据出生日期查五行

6、出生日期属相查询:如何具体的查看自己的生肖属相?

首先要先知道自己详细的出生年月(农历时间),毕竟生肖属相是按农历计算的,接着查询自己出生那一年具体是什么属相年,就可以知道自己的生肖属相。

例如知道自己的公历生日为年2月4日,根据万年历查询可以得知,农历生日是年腊月十七,农历丙戌年生,所以公历年2月4日出生的生肖属相属狗,一定要注意的是,若出生公历年份和农历年份不同,需要以农历年份为准。日子属相对照表。

生肖属相的详细解释:属相生肖查询。

十二生肖源于何时,今已难于细考。长期以来,不少人将《论衡》视为最早记载十二生肖的文献。十二生肖的产生,有着天文学的背景。在原始时代,先民们体验着寒暑交替的循环往复。

十二生肖也被称为十二年兽。在中国的历法上有十二只年兽依次轮流当值,所以我们的中国年就有以鼠,牛,虎,兔,龙,蛇,马,羊,猴,鸡,狗和猪应用在历法上,所以应该算阴历,不能算阳历。

古人把十二地支用十二个动物表示,如子鼠,丑牛等等,该年出生的人,便具有相应的命相,此即十二生肖,肖者相也,又称为十二属相。

以上就是与怎么算出生日期属相相关内容,是关于怎么算出生日期属相的分享。看完出生日期属相查询后,希望这对大家有所帮助!

提起属相的算法和计算方法,大家都知道,有人问十二生肖速算方法,另外,还有人想问真正的属相怎么算,你知道这是怎么回事?其实属相怎么算?下面就一起来看看怎么算出生日期属相,希望能够帮助到大家!

属相的算法和计算方法

1、若说人的属相是什么,属相的算法是按农历的年份来说的,和月、日、时没有关系

2、比如:年立春之后出生的属相为羊,年农历立春之后出生的则属相为猴

3、而具体的每个月份、日子、时辰的干支是什么,则查日期就都可以知道

生肖属相应该按照农历计算还是阳历计算

是属鼠,

中国属相按农历春节划分。

跟立春和阳历无关

属相是怎么算的

1、属相是按五行(地支)配属来区别的

2、而五行又分别按农历年份来进行排列

3、根据中国的农历和阳历来配,每十二年一个

4、地支和属相的搭配是:子鼠、丑牛、寅虎、卯兔、辰龙、巳蛇、午马、未羊、申猴、酉鸡、戌狗、亥猪。

祝:好!

按中国属相的话。

按:子鼠、丑牛、寅虎、卯兔、辰龙、祀蛇、午马、未羊、申猴、酉鸡、许狗、亥猪。这十二生肖的顺序来计算-

-。今年是鼠年。今年出生的就属鼠。明年就是牛年。那么一圈再回到鼠时就正好十二岁。

你要找到你出生的那年是什么年。比如年就是未羊。羊年。

属相的算法和计算方法:十二生肖速算方法

计算方法:

1、诞生年代除以12,取余数。如果能整除,余数视为零。我们可以采用简单的方法是,先减去一定的年份,再取十二的余。

2、在多计算的年份为年后,而年是鼠年,如年,可以先减去,得到24,再除以12,余数是0。故年的生肖跟年相同,为鼠年。

3、按照下列数字表对应生肖动物:

属相怎么算?

0—猴1—鸡2—狗3—猪

4—鼠5—牛6—虎7—兔

8—龙9—蛇10—马11—羊生肖取数十二,暗合古人对自然现象的归纳性认识。

中国先民感受到寒暑交替,植物枯荣的周期,以之为“一岁”。月亮的盈亏周期也与“岁”相关——十二次月圆正好一岁。用木星作为年的周期,“岁星”绕行一圈刚好十二年。《周礼·春官·冯相氏》云:“掌十有二岁、十有二月、十有二辰”,除计年计月,十二也用做计量时辰。

十二也经常用于其他方面。《左传·哀公七年》中载,“周之王也,制札上物,不过十二。以为天之大数也。”《国语·晋语四》记,“黄帝之子二十五宗,其得姓者十四人,为十二姓”。《后汉书·苟爽传》云:“故娶十二妇,天之数也。诸侯以下各有等差。”

“十二天象”又是古代对天气的统称,即暗、阴、雨、雪、冰、雾、露、霜、风、沙、雷、电;”十二经脉”是中医对人体经络的认知;古代音乐有“十二律”;饮食有“十二食”;穿衣有“十二衣”……

以上就是与怎么算出生日期属相相关内容,是关于十二生肖速算方法的分享。看完属相的算法和计算方法后,希望这对大家有所帮助!

计算属相的方法正确的是立春。春节(阴历的正月初一)只是现今民间的通俗算法。

我国古代的历法其实有两种,一种根据月亮的运行而定,是“阴历”;另一种根据太阳的运行来定,是古代的“阳历”。二十四节气是根据太阳的运行来定的,立春是古代阳历新的一年的第一天,十二个生肖(古代称为十二地支)是跟着这个定的,与阴历无关。

另外,除了年有生肖(地支)外,月、日、时辰,都有相应的生肖(地支),(需要说明的是这个“月”也是根据二十四节气划定的,不是阴历的月)。譬如立春起到惊蛰叫寅月(虎),晚十一点到凌晨一点叫子时(鼠)。

所以每个人其实有四个生肖!

年、月、日、时辰的每个地支(子、丑、寅、卯)根据历法会有一个相应的天干来配(共十个天干:甲、乙、丙、丁),这样每个人会有八个字,这也就是古代“生辰八字”的来历咯。

还有,大家要知道,现今的春节(阴历的正月初一)在民国之前称作“元旦”,是袁世凯把“元旦”改到公历一月一号,把阴历的正月初一改称“春节”,而古代的春节专指立春那一天,立春和春节在民国以前是同一天。

所以经过民国时期的改动,到中华人民共和国继承了民国以西元历法(公历)作为纪年,包括春节、元旦的大改动后,近百年来,属相的算法也就完全混淆了。现今或许只有老一辈的人和懂得生辰八字知识的人知道属相的正确算法了。

如果立春那日出生,第一步、要在万年历上查到出生那一年的立春那天交节气的时间点;第二步、了解自己的出生地和精确到分的出生时间,以上两项在某些网站上可以换算出你出生的真正太阳时(原来的只是北京时间);第三步、将两项时间比较,早于交节气时间的是前一年的生肖,反之则是后一年的生肖。汗!好复杂啊!

提起每一天属什么属相怎样算,大家都知道,有人问生肖属相应该按照农历计算还是阳历计算,另外,还有人想问一个月每天的生肖是怎样推算的,你知道这是怎么回事?其实每一天各代表什么生肖,下面就一起来看看每天的日子是什么生肖怎么知道,希望能够帮助到大家!

每一天属什么属相怎样算

每一天生肖属相表

六十甲子,十二生肖

每一天各代表什么生肖

我来回答您提出的问题;这是根据十二生肖来进行排列的。也就是十二生肖的固定程序;也即;鼠、牛、虎、兔、龙、蛇、马、羊、猴、鸡、狗、猪。只要记住某一天的生肖,那么以后连续的每一天的日子是什么生肖就知道了。

看日历。。。。

怎么才知道十二生肖属什么?

哪吒在的头衔为中坛元帅、太师、威灵显赫大将军、三坛海会等,俗称太子爷、三太子。三太子排行老三应该是属虎,虎在十二生肖里排第三位,子鼠、丑牛、寅虎、卯兔、辰龙、巳蛇、午马、未羊、申猴、酉鸡、戌狗、亥猪。

每一天属什么属相怎样算:生肖属相应该按照农历计算还是阳历计算

是属鼠,

中国属相按农历春节划分。

跟立春和阳历无关

真正的属相怎么算

新年没立春之前,属相仍然是前一年的属物。按前一前属相算。只有立春后才是新一年的开始。

生肖所反映的其实是一个时间概念,每一个生肖所管的时间是平均的,就是地球绕太阳转一圈的时间,十二年一个。

正确的生肖时间计算应是从交立春的那一刻开始至次年交立春前结束。

例如在阳历年2月4日零时52分(交09年立春)后——年2月4日6时42分(交年立春)前这个时间段出生的小孩,其生肖属牛。

生肖的划分既不是按阳历来划分,也不是以农历来划分,而是以节令来划分的。按节令划分是最精确的,因每月的节气交令点都会根据地球所处的位置及时作出调整。

十二生肖是十二地支的形象化代表,即子(鼠)、丑(牛)、寅(虎)、卯(兔)、辰(龙)、巳(蛇)、午(马)、未(羊)、申(猴)、酉(鸡)、戌(狗)、亥(猪)。

随着历史的发展逐渐融合到相生相克的观念,表现在婚姻、人生、年运等,每一种生肖都有丰富的,并以此形成一种观念阐释系统,成为文化中的形象哲学,如婚配上的属相、会祈祷、本命年等。现代,更多人把生肖作为春节的吉祥物,成为娱乐文化活动的象征。

立春,是干支历二十四节气中的第一个节气,又名岁首、立春节、正月节。干支纪年法,以立春为岁首,交节日为月首。

“立春”是依据黄道推算出来的,当北斗七星的斗柄指向寅时为立春节点,即太阳到达黄经°时。立,是“开始”之意;春,代表着温暖、生长。立春作为二十四节气之一,与立夏、立秋、立冬一样,反映着一年四季的更替,此外还意味着新的一个已开启,新的一年之始。

每一天属什么属相怎样算:一个月每天的生肖是怎样推算的

甲子,乙丑,丙寅,丁卯,戊辰,己巳,庚午,辛未,壬申,癸酉,甲戍,乙亥,丙子…十天干与十二地支依序排列下去,到了六十天後第六十一天又从甲子开始,每一个地支会分别排上五个不同的天干,如甲子,丙子,戊子,庚子,壬子(金,木,水,火,土)各有不同的特质…说是十二生肖其实是六十生肖。望采纳!

以上就是与每天的日子是什么生肖怎么知道相关内容,是关于生肖属相应该按照农历计算还是阳历计算的分享。看完每一天属什么属相怎样算后,希望这对大家有所帮助!

提起出生年月怎么算出属相生肖,大家都知道,有人问由出生年月日如何算出生时辰,另外,还有人想问日期和月怎么算生肖,你知道这是怎么回事?其实如何根据出生日期如何精确计算属相?下面就一起来看看知道出生年月,怎么快速算出生肖,希望能够帮助到大家!

出生年月怎么算出属相生肖

要想快速算出生肖,首先你要熟悉12属相,在用自己的属相和对方的年纪往前推,比如你18属兔的,对方是23岁,18与23相差5岁,那你就用你的属相往上推5岁,子鼠丑牛寅虎卯兔,你属兔那就往上再推一个属相就是亥猪,所以对方就是属猪的,再有你是28岁属蛇,对方26岁,属蛇往前推两岁,巳蛇午马未羊,对方就是属羊的

怎么计算年份对应的生肖?

按农历以立春为开始————-

怎么用年份推算生肖?求方法

记得自己出生的年份是什么生肖,然后12年以内的就按十二生肖排序来算。12年以外的就加上12的倍数。比如年是属牛,那年就是(-)/12=2余数6。年就是牛年后面第六个生肖。(鼠牛虎兔龙蛇马羊猴鸡狗猪)属羊。

十二生肖年份是以正月初一开始算的,如年正月初一,为己亥年,所以十二生肖年为猪年,如年正月初一,为庚子年,十二生肖年就为鼠年。农历干支(生肖)

如何根据出生日期如何精确计算属相?

出生年月怎么算出属相生肖:由出生年月日如何算出生时辰

子(鼠)(午夜23时至1时):

在一日中,子时一天的最后时刻,也是新一天的开始。在十二生肖中属于鼠。

丑(牛)(凌晨1时至3时):

丑时指的是黎明前的黑暗阶段。据说是牛开始日出耕田的时刻。在十二生肖中属于牛。

寅(虎)(凌晨3时至5时):

在一日中,天方大白之时,正是老虎开始活动的时刻,因此在十二生肖中属于老虎。

卯(兔)(清晨5时至7时):

卯时是太阳已,开始放万丈光芒的时候。在十二生肖中属于兔。

辰(龙)(清晨7时至9时):

辰时太阳光热增强时刻,据说是群龙行西的时刻,因此在十二生肖中属于龙。

巳(蛇)(上午9时至11时):

巳时太阳光热更强了,在十二生肖中属于蛇。

午(马)(上午11时至下午13时):

在一日中,阳光最为猛烈。在十二生肖中属于马。

未(羊)(下午13时至15时):

在一日中,未时是暑气将消之时。在十二生肖中属于羊。

申(猴)(下午15时至17时):

在一日中,申时的暑气已快过去了。在十二生肖中属于猴。

酉(鸡)(下午17时至晚上19时):

在一日中,酉时是夜晚将来临所的时刻。在十二生肖中属于鸡。

戌(狗)(晚上19时至21时):

在一日中,戌时正是黑夜扩散,华灯初上时分。在十二生肖中属于狗。

亥(猪)(晚上21时至午夜23时):

在一日中,亥时是一日将尽,要迈向明日之前时分。在十二生肖中属于猪。

出生年月怎么算出属相生肖:日期和月怎么算生肖

以上就是与知道出生年月,怎么快速算出生肖相关内容,是关于由出生年月日如何算出生时辰的分享。看完出生年月怎么算出属相生肖后,希望这对大家有所帮助!

以上就是关于用VB语言编写输入出生日期算出生肖与星座的程序全部的内容,包括:用VB语言编写输入出生日期算出生肖与星座的程序、计算属相的方法是什么、出生日期属相查询,怎么算出生日期属相等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/10087685.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-05
下一篇 2023-05-05

发表评论

登录后才能评论

评论列表(0条)

保存