1年一棉婚,2年一皮婚。3年一麦婚、4年一蜡婚、5年一木婚,6年一铜婚、7年一羊毛婚!8年年一虞美人婚39年一陶婚,10年一锡婚、11年一珊瑚婚。12年一丝婚,13年一铃兰婚。14年一铅婚。15年一水晶婚、16年一蓝宝宝石婚,17年一玫瑰婚!18年一绿松石婚,19年一印花婚!20年一瓷婚!21年一乳白石婚,22年一青铜婚、23年一绿玉婚。24年一萨丁婚!25年一银婚。26年一玉婚,27年一桃花心木婚、28年一镍婚、29年一绒婚。30年一珍珠婚!31年一羊皮婚,32年一紫铜婚!33年一斑岩婚!34年一琥珀婚!367407年一梅斯林婚。37年一纸婚。38年一水银婚、39年一绉纱婚、40年一祖母绿婚、41年一铁婚。42年一珠质婚,43年一法兰绒婚、44年一黄玉婚。45年一朱红婚!46年0375一薰衣草婚;47年一开斯米婚、48年一紫晶婚、49年一雪松婚、50年一金婚!60年一钻石婚。70年一白金婚,75年一白石婚、80年一橡树婚、。
当然是按公历、但农村一般按农历。我个人觉得不准,要是生到润月怎么办!例如润五月、好多年才有一次润五月、你不可能每年按按六月或是五月来过吧?要是按农历五月月来过?假如你有一远房哥,他是五月二号的。你是润五月一一号的?你不可能每年比比你哥还早过生日吧,,
太迷信了 。
中国传统岁岁数是虚岁。虚岁是按农历算、出生即为1岁。每过一次春节增1岁、虚岁只和过春节有关。和过生日无关, 农历1994年出生,现在是23虚岁,到农历2017年正月初一(公历2017年1月28日)是24虚岁。。
准确的来说,要按照立春的时间点来算!万年历上有明确的时间点,精确到几分几秒。因为你还没有过立春!所以还按照以以前计算?按照我们们的那的说法叫做亏岁数!,
年份。
鼠牛虎兔龙蛇马羊猴鸡狗猪!年份!、
第八层、
准备好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,
1913年出生的现在98岁 1925年出生的现在86岁 1937年出生的现在74岁 1949年出生的现在62岁 1961年出生的现在50岁 1973年出生的现在38岁 1985年出生的现在26岁 1997年出生的现在14岁 20浮9年出生的现在2岁!