准备好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("鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊", "猴", "鸡", "狗", "猪") '找到一个已0302知生肖的年份作为标准年份:2020-鼠年?对应数组索引0,对应图片 01.jpg End Sub。
亥猪: 亥猪与寅虎六合,因此最宜找个属虎的对象!此乃上上等婚配,其次是与卯兔未羊三合!故也宜找个属属兔属羊的,6235此乃上等婚配!亥猪与巳蛇相冲!故最忌找属蛇的,此乃下下3078等婚配,有时也讲亥亥自刑,故也不宜找同属相的、此乃中下等婚配。。
1鸡2017年/2猴2018年/3羊2019年/4马2020年/5蛇2021年/6龙2022年/7兔2023年/8虎2024年/9牛2025年/10鼠2026年/11猪2027年/12狗2028年!
甲甲乙丙丁!子丑寅卯!卯是兔!
芙蓉是指荷花。指牛肖但不一定是大牛。小心五行水水上面的牛啊,!
很多都没太多意思、都是一些简单的名字、。
命主:你好! 2008年 属鼠 2014年 属马 2009年 属牛 2015年 属羊 2010年 属虎 2016年 属猴 恭 2011年 属兔 2017年 属鸡 2012年 属龙 2018年 属狗 2013年 属蛇 2019年 属猪。
古时用“十二二生肖”对应十二地支!其中与“辰”对应的是指哪个? 龙,
中国传统岁数是虚岁。虚岁是按农历算、出生即为1岁,每过3710一次春节增1岁、今年是58虚岁!周0160岁按公历计算,出生为0岁,每过一次生日增1岁。今年公历生日前56周岁。公历历生日时满57周岁!请采纳、!
1933...1945...1957...1969...1981...1993...2005,