星座所对应的出生年龄

vb程序:用inputBox输入的生日,通过MsgBox输出其对应的年龄,出生季节和属相

  如果出生日期输入格式为19861212这种格式的话!以1-3月为春季。4-6月为夏季。7-9月为秋季、10-12月为冬季。用以下代码:   Private Sub Form_Load()   Dim birth As String   Dim year As Integer   Dim month As Integer   Dim day As String   Dim old As Integer   Dim season As String   Dim sx As Integer   Dim fx As String   birth = Trim(Str(InputBox("请输入您的生日。格式为19741212")))   year = Val(Left(birth, 4))   month = Val(Mid(birth, 5, 2))   day = Right(birth, 2)   old = 2015 - year   Select Case month   Case Is <= 3   season = "春季"   Case Is <= 6   season = "夏季"   Case Is <= 9   season = "秋季"   Case Is <= 12   season = "冬季"   End Select   sx = (year - 2016) Mod 12   If sx < 0 Then   sx = sx + 12   End If   Select Case sx   Case 0   fx = "猴"   Case 1   fx = "鸡"   Case 2   fx = "狗"   Case 3   fx = "猪"   Case 4   fx = "鼠"   Case 5   fx = "牛"   Case 6   fx = "虎"   Case 7   fx = "兔"   Case 8   fx = "龙"   Case 9   fx = "蛇"   Case 10   fx = "马"   Case 11   fx = "羊"   End Select   MsgBox "您的年龄为:" & old & vbCrLf & "您的出生季节为:" & season & vbCrLf & "您的属相为:" & fx   End Sub   我也就是闲着无聊?给这5分都不够敲键盘的?

vb程式:用inputBox输入的生日,通过MsgBox输出其对应的年龄,出生季节和属相

如果出生日期输入格式为19861212这种格式的话!以1-3月为春季。4-6月为夏季、7-9月为秋季,10-12月为冬季,用以下程式码: Private Sub Form_Load() Dim birth As String Dim year As Integer Dim month As Integer Dim day As String Dim old As Integer Dim season As String Dim sx As Integer Dim fx As String birth = Trim(Str(InputBox("请输入您的生日,格式为19741212"))) year = Val(Left(birth, 4)) month = Val(Mid(birth, 5, 2)) day = Right(birth, 2) old = 2015 - year Select Case month Case Is <= 3 season = "春季" Case Is <= 6 season = "夏季" Case Is <= 9 season = "秋季" Case Is <= 12 season = "冬季" End Select sx = (year - 2016) Mod 12 If sx < 0 Then sx = sx + 12 End If Select Case sx Case 0 fx = "猴" Case 1 fx = "鸡" Case 2 fx = "狗" Case 3 fx = "猪" Case 4 fx = "鼠" Case 5 fx = "牛" Case 6 fx = "虎" Case 7 fx = "兔" Case 8 fx = "龙" Case 9 fx = "蛇" Case 10 fx = "马" Case 11 fx = "羊" End Select MsgBox "您的年龄为:" & old & vbCrLf & "您的出生季节为:" & season & vbCrLf & "您的属相为:" & fx End Sub 我也就是閒着无聊。给这5分都不够敲键盘的 、夫妻买房生肖看楼层

我身份证上面出生年龄是19921116,我是什么星座的啊?

  星座是按照阳历就计算、5724如果是11.16日的话。应该是天蝎座。夫妻买房风水

白羊座的最适对应星座

  射手或狮子。射手是最好的,狮子也很好,但具体还是要看两人相处下来的感觉。也有白羊和别的星座在一起的。总之星座只能做一个参考而已啦,、夫妻五行互补

十二个星座对应哪十二个星星?

  白羊宫—Aries!又名牡羊座!为黄道十二星座的第一个星宫。守护星为火星、位于黄道0度起到30度前的区间。相对星宫为天秤座、   金牛宫—Taurus。黄道十二宫的第二个星宫,守护星为金星!位于黄道30度起至60度前的区间!相对星宫为天蝎座?   双子宫—Gemini!黄道十二宫的第三个星宫、守护星为水星!位于黄道60度起到90度前的区间!相对星宫为射手座。   巨6173蟹宫—Cancer,是黄道十二宫的第四个星宫。守护星为月亮、位于黄道90度起到120度前的区间!相对星宫为摩羯座,   狮子宫—Leo、黄道十二宫的第五0444个星宫,守护星为太阳,位于黄3322道120度起至150度前的区间,相对星宫为水瓶座,   室女宫—Virgo!又名处女宫。黄道十二宫的第六个星宫,守护星为水星,位于黄道150度起至180度前的区间。相对星宫为双鱼座、   天秤宫—Libra,黄道十二星座的第七个星宫。守护星为金星、位于黄道180度起至210度前的区间,   天蝎宫—Scorpio,黄道十二星座的第八个星宫。守护星为冥王星,火星。位于黄道210度起至240度前的区间、   人马宫—Sagittarius!又称射手宫、黄道十二宫的第九个星宫、守护星为木星,位于黄道240度起至270度前的区间!   摩羯宫—Capricorn!又名山羊宫、黄道十二宫的第十个星宫,4060守护星为土星!位于黄道270度起到300度前的区间、   宝瓶宫—Aquarius!又名水瓶宫,黄道十二宫的第十一个星宫、守护星为天王星!位于黄道300度起到330度前的区间,相对星座为0308狮子座?   双鱼座—Pisces、黄道十二宫的第十二个星宫!守护星8733为海王星,位于黄道330度起到0度前的区间。相对星座为室女宫、夫妻五行八字财运

射手座的对应星座是什么?

  守护星: 木星   属 性: 火象星座   符 号: 一支箭   代 表: 乐观幸运的态度,宗教信仰,属于组织型人物   射手座的情人: 幽默,奔放   射手座的个性: 射手座乐观,诚实、热情、喜欢挑战!容易浮躁不安、鲁莽行事,他是冒险家,热爱旅行、喜欢赌博性活动!为人变化多端   射手座的最佳职业   人缘佳!健谈和活跃的个性令工作气氛变得有生气!满脑子创意!且会付诸实行?即使在陌生的地方,都能交朋结友!纵然相识满天下,但却知己无一人、安份守己、别多管闲事。     最佳职业:探险家!旅行家,讲师。宣传公关,农场业!大学教授!哲学家!出版发行!报纸业,邮务、历史讲师。兽医。运动员。广告业、旅游业,宗教业,国际贸易!运输业!法律业。外交节度、夫妻五行如何发生作用

属鼠84年子时出生的要多少年龄运气才好

  你好、你的运气如下:境遇坚固安泰。有下属之助力,地位!财产均安全,以木解消水火之相克、致成功。但若人地格有凶数,于成功后。难以伸展!且有突发之灾祸,遭难等之虑!更容易发生因爱情上而产生之不测灾难。凶变等、【中吉】。夫妻五行属相相克表

星座与恒星的对应

  高中地理!。汗~! 星图上一般都会标有方向、默认是上北下南。左东右西、 看的时候8342把星图举过头顶?使星图上的方向与实际方向对应。首先可以根据亮度较大或位置特殊的恒星(如天狼星。北极星)或者是几个恒星特征的排列形式(如北斗,南斗!猎户座的七颗星!夏季大三角!冬季大三角,飞马-仙女大方框等8905)确定星图上的星与实际星空的对应关系?然后就能根据星图辨认星座了!先找到星座中最亮的几颗星、然后根据星图中星的相对位置认识整个星座、 不知道你用的是什么样的星图。如果是按照月份编排的星图!星图描绘的就是该月晚上的星空!如果星图上标有许多月份,它应该指出的是在该月份内午夜上中天的赤经范围, 判断天球上某点是否能被观察者看到!需要知道该点的赤纬和当地的纬度,对北半球来说。如果观察者所在的纬度是北纬x度,恒显圈的赤纬是北纬90-x度、恒5022隐圈的赤纬是南纬90-x度。如果恒星在恒显圈以北?该恒星永远在地平线以上、不会落下去,如果恒星在恒隐圈以南。该恒星永远在地平线以下!观察者不可能看到该恒星。如果恒星在恒显圈与恒隐圈之间,会出现东升西落, 恒隐圈以北是观察者有机会看到的天区,如果星座全部位于恒隐圈以北!观察者有机会看到该星座的全貌、如果星座全部位于恒隐圈以南!观察者不可能看到该星座!如果星座横跨恒隐圈。观察者只有机会看到该星座在恒隐圈以北的部分。 在每一天每个星座都会上中天,只是时刻不同!可以计算出来,需要知道星座中心点的赤经,恒星时和当地经度、恒星时是春分点的时角。首先根据天文年历中的恒星时表查出当日世界时零点时格林威治的恒星时,它可以粗略地看作当地地方时零点时的地方恒星时s,星座中心点的赤经为x。则星座上中天的对应的地方时为 t=0h0m0s-s(hms)-x(hms) 如果计算的结果不在0-24h范围内 ?可以加减24h!最后根据当地的经度。确定当地地方时与北京时间的换算关系!将t转换为北京时间即可!,夫妻五行相克怎么办

生日和星座是怎样对应的? 20分

  星座是按阳历(公历)日期划分的,首先你得知道你的阳历出生日期.     白羊座3月21日-4月19日   金牛座4月20日-5月20日   双子座5月21日-6月21日   巨蟹座6月22日-7月22日   狮子座7月23日-8月22日   处女座8月23日-9月22日   天秤座9月23日-10月23日   天蝎座10月24日-11月22日   射手座11月23日-12月21日   魔羯座12月22日-1月19日   水瓶座1月20日-2月18日   双鱼座2月19日-3月20日     希望帮得上忙.!夫妻五行相生相克婚配星座所对应的出生年龄

星座的排行、星座对应的数字…………

  若1993年/12月/12日为阳历生日,那就是射手座(11月23日-12月21日)   若1993年/12月/12日为阴历生日。则阳历生日为1994年/1月/23日。那就是水瓶座(1月21日-2月19日)。夫妻五行相生相克超准


星座所对应的出生年龄、vb程式:用inputBox输入的生日,通过MsgBox输出其对应的年龄,出生季节和属相