举例:比如张三生日是1970年8月8日在2010年10月10日投保,保至65周岁。保险到期是2035年(65周岁)10月10日(保单对应日)。在张三8月8日的时候就已经65周岁了,但合同是到周岁后的第一个保单对应日也就是10月10日到期。
辰龙,所以对应龙
十二地支和十二生肖以及五行的对应关系: 地支 子 丑 寅 卯 辰 巳 午 未 申 酉 戌 亥 属相 鼠 牛 虎 兔 龙 蛇 马 羊 猴 鸡 狗 猪 五行 水 土 木 木 土 火 火 土 金 金 土 水 比如说:1986年3月初4为丙寅年壬辰月丙戌日,也就是虎年龙月…… 1988年7月28 为戊辰年辛酉月丙寅日,也就是龙年鸡月……以此类推
亥猪 子鼠丑牛寅虎卯兔辰龙巳蛇午马未羊申猴酉鸡戌狗亥猪
准备好12个图片,取名sx01.jpg-sx12.jpg,放在当前文件夹。comboBox 只显示年份,添加一个按钮Command1 Dim strSxName Private Sub Command1_Click() Dim dd As Long '计算选择的年份和标准年份的差值 dd = (dateDiff("yyyy", #1/1/2020#, DateSerial(Combo1.Text, 1, 1)) Mod 12 + 12) Mod 12 Text1.Text = strSxName(dd) '载入对应的图片 Image1.Picture = LoadPicture(App.Path & "\" & Format(dd+1, "00") & ".jpg") End Sub Private Sub Form_Load() '初始化数组 strSxName = Array("鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊", "猴", "鸡", "狗", "猪") '找到一个已知生肖的年份作为标准年份:2020-鼠年,对应数组索引0,对应图片 01.jpg End Sub
公历:1989年8月29日11点 农历:己巳年七月廿八日午时 八字:己巳|壬申|辛酉|甲午 五行:土火|水金|金金|木火 纳音:大林木|剑锋金|石榴木|沙中金 分析:3个金,1个木,1个水,2个火,1个土; 属相:本命属蛇,大林木命。
只有经历过大风大浪的人才会体验到平凡可贵,没有非凡过,有什么资格谈平凡。
申,(猴),所以申时的属相是为猴. 酉,(鸡),所以申时的属相是为鸡.
顺序排列为子鼠、丑牛、寅虎、卯兔、辰龙、巳蛇、午马、未羊、申猴、酉鸡、戌狗、亥猪。
古人用天干和地支记序,其中天干有10个:甲乙丙丁戊己庚辛壬癸,地支有12个:子丑寅卯辰巳午未申酉戌亥将天干的10个汉字和地支的12个汉字对应排列成如下两行;: 甲 乙 丙 丁 戊 己 庚 辛 壬 癸 甲 乙 丙 丁 戊 己... 子 丑 寅 卯 辰 巳 午 未 申 酉 戌 亥 子 丑 寅 卯 辰 巳 午 未 申 酉 戌 亥... 你所说的“己末”并没有这个生肖,应该是“己未”,一般这个生肖是按照后面的字来排列的,“未”对应的生肖是羊,所以这个应该是羊年