情感上处于自我封闭的状况呢。就算可以维持表面的和谐。但是你和恋人却无法达到交心的境界，如果真的是恋人的错。你是否愿意意这样怨他一辈子呢。你今天要为自己的情感想一个出路才行！！
是龙 。古代是别人都成皇帝为九五之尊 、皇帝帝也就是龙？应为皇上做的椅子有许多都是龙弄得，求同意。
子鼠。丑牛。寅虎，卯兔，辰龙！巳蛇。午马！未羊、申猴。酉鸡，戌狗，亥猪 你要那个！、
中国占星4395学叫“寅”！就是生肖的的“虎”!又叫“析木”！“功曹”。还含有道士，火炉！福神、灶君！记人间善恶。所以中国民间择日家以“寅不祭祀”！每天对应相应的生肖，
1鸡2017年/2猴2018年/3羊2019年/4马2020年/5蛇2021年/6龙2022年/7兔2023年/8虎2024年/9牛2025年/10鼠2026年/11猪2027年/12狗2028年！
'定义生肖数组 Dim sx '以下两行按需求任选一行使用 sx = Split("鼠,牛,虎,兔,龙,蛇,马,羊,猴,鸡,狗,猪", ",") 'sx = Split("子鼠,丑牛,寅虎,卯兔,辰龙,巳蛇,午马,未羊,申猴,酉鸡,戌狗,亥猪", ",") '在TextBox1中输入年份， 'TextBox1限制输入字数为4(属性MaxLength=4）且只能输入数字（代码） Private Sub TextBox1_KeyPress(ByVal KeyAscii As Integer) If KeyAscii，vbKey9 Then KeyAscii = 0 End Sub ‘使用CommandButton1计算生肖索引,在Label1显示生肖名称。在Image1显示生肖图片 Private Sub CommandButton1_Click() Dim sxIndex As Integer sxIndex = Abs(inYear - 1900) Mod 12 '计算生肖名称索引，1900是鼠年的年份数 Label1 = sx(sxIndex) '显示生肖名称 Image1.Picture = LoadPicture(ActiveWorkbook.Path & "\sxpic\sx" & sxIndex & ".jpg") '显示生肖图片。生肖图片使用像“sx0.jpg”这样的文件名、要求：1、文件必须是保存过的！2。需要把生肖图片放在文件所在文件夹的子子文件夹“sxpic"之下 End Sub!
农历：1月寅月（虎）！2月卯月（兔）。3月辰辰月（龙）,4梗巳7746月（蛇）,5月午月（马）6月未月（羊），7月申月（猴）、8月酉月（鸡），9月戌月（狗）、10月亥月（猪）！11月子月（鼠）!12月丑月（牛）！、
坐怀不乱 zuò huái bù luàn [释义] 春秋时鲁国的柳下惠将受冻的女子裹于怀中。没有发生非礼行为。形容男子在两性关系方面作风正派、 [语出] 明·兰陵笑笑生《金瓶梅词话》第56回：“人人都说他无行！其实水秀才原0382是坐怀不乱的!，
买本四柱基基础就有了嘛!百度一下应该也会有、起年法、起月法！起日法！起时法。现在很少用这个了、不是都有自动排盘的嘛，一般都不会错。可能起大运具体体年月!有些会所有所出入！。
柳 按地支兔对应“卯”。打6055一字应该是“柳”、。
上一篇：每天对应的是哪个生肖
下一篇：农历每天对应生肖
每天对应相应的生肖、农历每天对应生肖