阴历的大年初一到除夕!!
飞星的位置每年都不一样的。九星即为一白、二黑,三碧!四绿!五黄、六白,七赤,八白及九紫、九宫按洛书排布,飞星星轨迹由中宫作起点、然后后按照洛书数序飞移!因此、飞星轨迹又称洛书轨迹(洛书步法)。顺飞:数字由小到大排列、逆飞:数字由大到小排列、顺逆飞排列顺序、按洛书由中为一乾一兑一艮一离一坎一坤一震一巽一中排列、(玄学通风水罗盘),
按照正月初一起算,应该是属兔!。。
兔日冲鸡,。
我是是十月初六!
星座是按阳历(公历)日期划分的!首先你得知道你的阳历出生日期,然后对照下面的资料, 白羊座:3月21日~4月20日 金牛座:4月21日~5月21日 双子座:5月22日~6月21日 巨蟹座:6月22日~7月22日 狮子座:7月23日~8月23日 处女座:8月24日~9月23日 天秤座:9月24日~10月23日 天蝎座:10月24日~11月22日 射手座:11月23日~12月21日 魔羯座:12月22日~1月20日 水瓶座:1月21日~2月19日 双鱼座:2月20日~3月20日!
只要预定全年的邮票,就包含了生肖邮票,不可以单独预定生肖票,另外每个身身份证只能订最多5版,!
关关捷报痘槐做好缚!
需要配合八字推测的命理想知道更多的的私聊?
准备好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每年生肖那天计算!
上一篇:每年的生肖是怎么定的
下一篇:每年生肖
每年生肖那天计算、每年生肖