你好楼主！1922年。国际天文学联合会大会决定将天空划分为为88个星座!其名称基本依照历史上的名称！ 人类肉眼可见的恒星有近六千颗，每颗均可归入唯一8972一个星座!每一个星座可以由其中亮星的构成的形状辨认出来！全天的88个星座是： 北天拱极极星座（5个）：小熊座（最靠近北天极）！大熊座、仙后座，天龙座！仙王座、 北天星座（19个）：蝎虎座、仙女座，鹿豹座！御夫座、猎犬座，狐狸座、天鹅座。小狮座，英仙座。牧夫座、武仙座！后发座。北冕座，天猫座、天琴座。海豚座、飞马座！三角座（小星座）、天箭箭座（小星座）! 黄道十二星座（12个）：巨蟹座。白羊座。双子座，宝瓶座，室女座、狮子座，金牛座、双鱼座。摩羯座，天蝎座，天秤座。人马座！ 星座 赤道道带星座（10个）：小马座!小犬座，天鹰座、蛇夫座、巨蛇座，六分仪座，长蛇座，麒麟座，猎户座。鲸鱼座、 南天星座（共42个）：天坛座。绘架座，苍蝇座！山案座、印第安座，天燕座。飞鱼座。矩尺座。剑鱼座。时钟座。杜鹃座。南三角座、圆规座！蝘蜓座！望远镜座、水蛇座、南十字座（小星座），凤凰座！孔雀座。南极座。网罟座，天鹤座。南冕座、豺狼座、大犬座，天鸽座、乌鸦座！南鱼座，天兔座！船底座，船尾座、罗盘座，船帆座，玉夫座、半人马座、波江座，盾牌座！天炉座，唧筒座、雕具座，显微镜座、巨爵座，！
招财火以“优惠券+优惠买单”为基础、简化操作流程，提升用户体验。，
要先交钱的。都是坑。我也被被骗怕了啊。
两个标签。两个Text Public Function Constellation(mDate As Date) As String '星座 Constellation = Mid("摩羯水瓶双鱼白羊金牛双子巨蟹狮子处女天秤天蝎射手摩羯", (Month(mDate) + IIf((Day(mDate) - (19 + Int(Mid("102123444533", Month(mDate), 1)))) >= 0, 0, -1)) * 2 + 1, 2) & "座" End Function Public Function GetCNum(d As Date) As Integer Select Case Constellation(d) Case "白羊座" n = 0 Case "金牛座" n = 1 Case "双子座" n = 2 Case "巨蟹座" n = 3 Case "狮子座" n = 4 Case "处女座" n = 5 Case "天秤座" n = 6 Case "天蝎座" n = 7 Case "射手座" n = 8 Case "摩羯座" n = 9 Case "水瓶座" n = 10 Case "双鱼座" n = 11 End Select GetCNum = n End Function Private Sub Text1_KeyPress(KeyAscii As Integer) Dim d As Date If KeyAscii = 13 Then d = Text1.Text strConstellation = Constellation(d) Select Case Constellation(d) Case "白羊座" s = "平时活力十足的你。今天却变得混身没劲！不想让感情只是是三分钟热度,就仔细想想该如何经营、偶尔也要培养气质，去买本好好书吧,今今天没啥冲劲!不妨低调沉潜！伺机而动、" Case "金牛座" s = "会接触不少人、记得放开胸怀。别太闷了。睁大眼睛瞧！新对象或许就出现啰、一个轻松的聚会场合令你破费、工作:今天会和不少人开会、互动频繁，" Case "双子座" s = "无往不利。全力打拼！想让你安定下来！今天是个好时机！平时花1468钱很随兴的你！突然想作财务务规划!5278今天会做一项重要决策，相信自己准没错、" Case "巨蟹座" s = "别老待在家里？今天是出外走走的好时机。和亲爱的他到户外踏青去、有场聚会将会让你破费。提升自己的竞争力！应接触些些平时不懂的业务。" Case "狮子座" s = "收起尖锐的利爪，今天凡事好商量！强势的狮子成了温柔的的小猫，只想依2812偎着心爱的他、会为家人购买一些小礼物。有人找你帮忙处理公务，你不好意思拒绝、" Case "处女座" s = "拓展生活圈？建立新关系的好时机！单身的人将感到特特别地孤单！很期盼爱情降临！和朋友共共同讨论合资的计划?工作: 要妥善处理合作案的细节? " Case "天秤座" s = "对事情能够屏除偏见、具有客观。冷静判断力的一天，对自己理念的坚持！让你在态度度上也强势了起来!之前投资的都有获得回报的迹象，今天你让人感觉成熟稳重，可托付重重任的样子！" Case "天蝎座" s = "顺路经过感兴趣的店，不妨进去看看！不要排斥相亲或是是朋友介绍？也许会遇到不错的人选唷、适合出门逛街买些秋冬用品、初次相见见的人特别值得注目!你从身上可学到不5026少东西!" Case "射手座" s = "年长的朋友可望对你提出有益的建言、今天是个适合向亲密朋友吐吐露心事的日子!为了讨好情人。不惜打种脸充胖子，要注意对长辈或年9041纪较长者。要比平常更客气一点的言词相待！" Case "摩羯座" s = "不论自己心情如何都要隐藏起来？多保持笑容才拉近与他人的关系。即使是亲密的人！还是要尊重对方的自自尊心！真心诚意帮助别人，也是为自己开运、为了处理别人的事！自己的事都没做到一天就结束了。" Case "水瓶座" s = "是个不能一心二用的日子，顾得了东就顾不了西！力量宜集中在一件事物上，5997看人不能只看外表！小心有跌破眼镜的时候。一感到苗头不对，就要有修正计划的应变措施，心急的要求成果。反而越搞越乱、其实慢慢做的话，倒是还能蛮顺利就解决了！" Case "双鱼座" s = "陶醉于玩乐的气氛中。让你很high。热情参加朋友邀约的轻松聚会！会有意意想不到的恋情发展！吃喝玩乐的开销颇大！小心控制，下班下课后的约会。休闲、可将压力一口气解消掉了，" End Select Label1.Caption = strConstellation & vbCrLf & s End If End Sub Private Sub Text2_KeyPress(KeyAscii As Integer) Dim d1 As Date, d2 As Date If KeyAscii = 13 Then arr = Array(Array(90, 64, 86, 22, 94, 65, 83, 44, 93, 25, 84, 46), _ Array(62, 91, 83, 41, 16, 94, 48, 85, 66, 93, 22, 76), _ Array(83, 42, 91, 67, 79, 20, 94, 63, 80, 39, 96, 24), _ Array(26, 83, 63, 94, 36, 82, 24, 96, 45, 84, 59, 94), _ Array(92, 22, 87, 43, 89, 63, 84, 30, 93, 63, 81, 44), _ Array(66, 93, 19, 86, 57, 96, 44, 82, 25, 94, 39, 83), _ Array(82, 47, 90, 17, 77, 46, 91, 64, 77, 21, 94, 64), _ Array(45, 87, 62, 92, 19, 76, 62, 94, 44, 58, 23, 97), _ Array(91, 65, 82, 47, 93, 23, 76, 35, 94, 64, 77, 23), _ Array(20, 96, 44, 78, 55, 97, 27, 82, 66, 96, 46, 78), _ Array(82, 21, 92, 59, 79, 44, 90, 22, 78, 43, 95, 66)) d1 = Text1.Text d2 = Text2.Text n1 = GetCNum(d1) n2 = GetCNum(d2) Label2.Caption = arr(n1)(n2) End If End Sub！
“鸡”生肖、因为鸡365天都陪伴着你！它每时每刻2475都在预报着、白天黑夜的信息，请参考！、
淘宝一下！关于天文和风水的入门书籍，一个是迷信，一个是科学！。
我用的人生日历上面自带的星座运程。没事我会去看看，。
7103 第一名：天生爱钱的金牛座金牛座对金钱的渴望。估计没有几个星座能比得上、只要说到钱。金牛眼睛就就能花光,他们不单单赚钱厉害！理财更是一把好手，对他们来说！没钱就没安全感！看到银银行里面的数字在飞速上涨。他们内心才会踏实。赚到钱后！他们会合理的分配资金去向、哪些该投资、哪些该买理财产品、什么样项目风险最低，他们都会一一评估好。所以说4514金牛座是个实实在在的理财好手？第二名：有很强的理财潜能的双子座双子座生性贪玩、怎么会排名第二呢、别看他他们这样!其实他们内心有很强的理财潜能。只是看会不会被挖挖掘出来，如如果在顺境中。双子会会满足于现状、不会追求太多，8784但是在逆境中？却完全相反、逆境中他们能把理财的潜能发挥到到极致！穷怕6813的双子才是真的一把理财好手。第三名：有着发财欲望的天蝎座天蝎座有着很强的发财欲望！可以说做梦都想发财的那种，因为这样才可以显示他们的魅力。更能体现他们的神秘感！而对于理财！他们也是高手中的高手。对于高风险高回报的理财方式，他们一般会选择放弃，他们理财大多都会选选择风险没那么高，但是回报相对较大的方式、当然谁都想要这种方式。只不过对于天蝎来说，他们更能把握住机会，第四名：为了家庭而省钱的巨蟹座巨蟹座的人理财最重要的方式就是一个字——省，他们很多钱都是省出来的。比如买东西。往往会逛遍同类的店。然后货比三家，看看哪家最便宜。就买哪哪一家的,不该买9480的东西一件都不会买!如果有了一定的存款！他们会选择找一些没有什么风险的项目。让钱生钱、虽然他们比不过过其他几个星座，但是他们也不亏是个理财好手，天文星座座小程序、
例如：容祈 出自拜托，。我觉得这么诡异非常人可及的性格天蝎还比较2836容易担任天蝎座!现在3985言情都是什么霸道。邪魅！冷酷！ 但是基本上不会直接说星座、根据性格猜呗，柔情！纠结。花心！腹黑，
双鱼座（拉丁语：Pisces！天文符号：♓）是黄道星座之一、面积889.42平方度，占全天面积的2.156%，在全天的88个星座中、面积排行第十四！双鱼座每年9月27日子夜中心经过上中天！双鱼座中亮于5.5等的恒星有50颗！最亮星为右更二（双鱼座座η）！视星等为3.62，现在的春分点位于霹雳五（双鱼座ω）附近、纬度变化位于+90°和−65°之间可全见, 8976纬度位于90°和 -65°之间的地区可见，最佳佳观测时间为11月的21:00？双鱼座最容易辨认的是两个双鱼座小环。特别是紧贴飞马座南面由双鱼座β、γ。θ，ι、χ！λ等恒星组成的双鱼座小环！另一个双鱼座小小环位于飞马座东面。由双鱼座σ！τ、υ，φ，χ。ψ1等恒星星组成！ 9206 从星图上看。双鱼座中位于秋季四边形正南的这几颗星星可以看成是一条鱼（西鱼）,四边形的飞马座β星和仙女座α星向东延长一倍碰到的那几颗暗星是另一条鱼（北鱼）、而位于两条鱼之间的！ 以α星为顶点的“V”则是栓住它们的“绳子”！ 这个星座有一一个梅西耶天体：M74,位于双鱼座最亮星星右更二附近。 在天球上！黄道与天赤道存在两个交点。其中黄道由西向东从天赤道的南面穿到天赤道的北面所形成的那个交点！在天文学上称之为“春分点”、这个点在天文学上有着极为重要的意义，而目 前、这个重要的“春分点”就在双鱼座内！中国古代传统将双鱼座天区包括壁宿的霹雳！云雨、土公。奎宿的奎！外屏和娄宿的右更等星官 星座主要星体 拜耳命名法弗兰斯蒂德命名法其他名称中国星官视星等 双鱼座α----Al Rischa外屏七3.80 双鱼座β----Fum al Samakah霹雳一4.53 双鱼座γ----Simmah霹雳二3.69 双鱼座δ--------外屏一4.43 双鱼座ε--------外屏二4.28 双鱼座ζ--------外屏三5.20 双鱼座η----Kullat Nunu右更二3.62 双鱼座θ--------霹雳三4.28 双鱼座ι--------霹雳四4.13 双鱼座κ--------云雨一4.93 双鱼座λ--------云雨四4.49 双鱼座μ--------外屏四4.84 双鱼座ν--------外屏五4.45 双鱼座ξ--------外屏六4.62 双鱼座ο--------右更四4.26 双鱼座π--------右更三5.55 双鱼座ρ--------右更一5.38 双鱼座σ--------奎宿增十五5.50 双鱼座τ--------奎宿十一4.51 双鱼座υ--------奎宿十三4.75 双鱼座φ--------奎宿十四4.65 双鱼座χ--------奎宿十五4.66 双鱼座ψ1--------奎宿十六5.34 双鱼座ω--------霹雳五4.04 ----双鱼座14----云雨增二5.88 ----双鱼座19----云雨增七4.95 ----双鱼座21----云雨三5.75 ----双鱼座32----土公一5.70 ----双鱼座45----土公二6.78 ----双鱼座101----右更五6.20 ----双鱼座107----娄宿增三5.14-5.26...余下全文>>、
天文星座小程序、招财火小程序怎么样