在帮帮测看你选择什么项目,不同项目有不同的收费标准,但是他们收费都是统一的,不会乱收费,不算贵很合理。
应该是80年代出的星座,是2892机芯。认证看一下表壳的标志就知道了。欧米茄一般都是天文台
情况不一样,有免费的,也要收费的 提问者采纳 星座是按阳历(公历)日期划分的,首先你得知道你的阳历出生日期,然后对照下面的资料。 白羊座: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日 上面是12星座日期查询表,对照表格便可知道自己所属星座。
农历庚戌(1970)年五月十三是 公历: 1970年6月16日 太阳星座:双子座 星座特点:花心多变 生日范围:5月21日-6月21日 四象属性:风 掌管宫位:第三宫 阴阳属性:阳性 最大特征:思想 主管行星:水星 幸运颜色:黄色 吉祥饰物:猫眼石 幸运号码:7 开运金属:水银 表现:灵活、沟通、口才 优点:沟通力强,思维活跃。 缺点:善辩,多变,难以专精。 基本特质:太阳位于双子座的人,思维跳跃,口才伶俐,鬼点子多,常语出惊人,但有三心二意的倾向,情绪起伏多变,难以专心。 具体特质:双子座是黄道宫上的第三个星座,受水星守护,思维敏捷,有良好的沟通能力,反应迅速,适应力强。太阳落在双子座的人追求并享受生动、多姿多彩、富于变化的生活环境,平淡、一成不变的环境难以引起你的兴趣。因为你有很强的交际能力,所以身边不缺朋友,风趣机智的表现也常受身边人的欢迎。在好奇心的驱使下,你对新知有着强烈的求知欲,接受力强,因此储备了满腹的新知和话题,让你颇有优越感。 行事风格:处变不惊,“变”是你的永恒追求,越是变动的环境越能激起你的挑战神经,如此才刺激,令你感到兴奋,做起事来也更加的起劲。追求变化、有创意才是你的行事风格,为了达到效果,不惜夸大其辞。 个性盲点:太阳位于双子座的人具有双重性格,情绪变化快速,做事有虎头蛇尾的倾向,应加强耐性,培养静心的功夫,更专心一些;因为想像力丰富,接收的讯息太多,使得你内心常处于矛盾状态,常有令人不解的举动;凡事据理力争,太好辩,易与人发生言语冲突。 总结:双子座的人往往喜好新鲜事物,他们有着小聪明,但做事常常不太专一。与双子座的人聊天也许会让你觉得很兴奋,因为他们脑子中那些新鲜的、稀奇古怪的东西会让有充满好奇。也许是对新鲜事物的追求和好奇,会让人觉得他们很花心,其实不然,他们仅仅是喜欢新鲜而已。
不能修改了
两个标签,两个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 = "无往不利、全力打拼!想让你安定下来,今天是个好时机!平时花钱很随兴的你,突然想作财务规划。今天会做一项重要决策,相信自己准没错!" Case "巨蟹座" s = "别老待在家里,今天是出外走走的好时机。和亲爱的他到户外踏青去!有场聚会将会让你破费。提升自己的竞争力,应接触些平时不懂的业务。" Case "狮子座" s = "收起尖锐的利爪,今天凡事好商量。强势的狮子成了温柔的小猫,只想依偎着心爱的他。会为家人购买一些小礼物!有人找你帮忙处理公务,你不好意思拒绝。" Case "处女座" s = "拓展生活圈,建立新关系的好时机。单身的人将感到特别地孤单,很期盼爱情降临。和朋友共同讨论合资的计划?工作: 要妥善处理合作案的细节? " Case "天秤座" s = "对事情能够屏除偏见,具有客观、冷静判断力的一天。对自己理念的坚持,让你在态度上也强势了起来。之前投资的都有获得回报的迹象。今天你让人感觉成熟稳重,可托付重任的样子!" Case "天蝎座" s = "顺路经过感兴趣的店,不妨进去看看。不要排斥相亲或是朋友介绍,也许会遇到不错的人选唷!适合出门逛街买些秋冬用品。初次相见的人特别值得注目,你从身上可学到不少东西。" Case "射手座" s = "年长的朋友可望对你提出有益的建言。今天是个适合向亲密朋友吐露心事的日子。为了讨好情人,不惜打种脸充胖子。要注意对长辈或年纪较长者,要比平常更客气一点的言词相待。" Case "摩羯座" s = "不论自己心情如何都要隐藏起来,多保持笑容才拉近与他人的关系。即使是亲密的人,还是要尊重对方的自尊心。真心诚意帮助别人,也是为自己开运。为了处理别人的事,自己的事都没做到一天就结束了。" Case "水瓶座" s = "是个不能一心二用的日子,顾得了东就顾不了西,力量宜集中在一件事物上。看人不能只看外表,小心有跌破眼镜的时候。一感到苗头不对,就要有修正计划的应变措施。心急的要求成果,反而越搞越乱,其实慢慢做的话,倒是还能蛮顺利就解决了。" 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
运势如下: 烦心事减少,意气风发状态飙升。木星移动给生活注入新鲜空气,对很多东西跃跃欲试。事业上周围人事异动送上难得机遇,可着手开展新项目,或把已有的局面翻新整合。跳槽还要再等。财运旺,外财尤其多,利申请加薪。感情上稳定安好,有伴的可选择置业,单身者耳聪目明,一眼看清来者何人。
一、【白羊座】 最佳恋爱时期:20-27岁 热情的白羊座们,总是冲动无比,年轻气盛,有冲劲当然是好事,可是恋爱这种事情,若是年纪太小,过于冲动了难免会造成不大好的结果,而过了二十七八,估计又冲动不起来了,因此最好的恋爱时期莫过于20-27岁啦。 二、【金牛座】 最佳恋爱时期:25-30岁 金牛座的人,恋爱时总是需要一定的物质作为基础,否则他们的心是不安的。如果太早的恋爱,虽然没有经济负担,但是会有经济压力。25岁之后,事业逐渐明朗,恋爱起来,也当然毫无压力。 三、【双子座】 最佳恋爱时期:26-32岁 对于喜新厌旧的双子座来说,年轻的时候,情绪尤其不稳定,经常朝三暮四,给别人伤害的同时,也伤了自己。等自己成熟起来了再恋爱,或许是会比较好的,毕竟那个时候,人的情绪也逐步走向稳定了。 四、【巨蟹座】 最佳恋爱时期:20-26岁 巨蟹座的人,不适合等到年纪大了才恋爱,因为他们的心态本来就老,一旦过了二十七八,恋爱起来,更会像是一个老人家,没有恋爱的氛围,也享受不到恋爱的浪漫。年轻的时候,不妨去恋爱吧。 五、【狮子座】 最佳恋爱时期:19-23岁 心高气傲的狮子座,如果是在经历风雨,成为真正的狮子王,大概这个时候恋爱起来会吃力吧,因为自己谁都看不上,而如果此时的自己是一事无成,大概也会相当自卑的吧。狮子的最佳恋爱时期,还是在读书时代的清纯时期哦。 六、【处女座】 最佳恋爱时期:21-26岁 处女座对待恋人是挑三拣四的,如果等日后自己得到了一定的锻炼,得到一定的事业,估计更加会对恋爱不抱什么信心,因为符合他们自己想法的人实在是太少了。因此,适合他们的恋爱时期,还是要在年轻哦。 七、【天秤座】 最佳恋爱时期:23-28岁 天秤座是优雅的,也是犹豫不决的,他们不宜太早恋爱,因为那只会让自己受伤。等大学毕业之的,经受了社会洗礼,天秤的优雅感,更会焕发出来。那个时候去恋爱,想必也是容易得到一生的幸福的。 八、【天蝎座】 最佳恋爱时期:20-30岁 在最好的年龄,遇到最爱的人,把青春奉献给自己最爱的人,大概是天蝎一生追求吧。不管是读书时代还是毕业的工作时代,有分寸的天蝎总是可以分开自己的公事与私事。所以恋爱对他们来说,是必不可少的一部分。 九、【射手座】 最佳恋爱时期:18-28岁 射手经常给人一种飘忽不定的感觉,他们总是爱玩,即使是读书时代,也是会把玩放在前面的。恋爱这种事情对于他们来说, 或许反而从某种程度上来说,可以帮助他们养成一种责任感。毕竟,射手们,责任感实在是太差了。 十、【摩羯座】 最佳恋爱时期:27-33岁 对于内心保守的摩羯来说,他们若是在求学时期就恋爱的话,会影响他们的更高的追求。在事业上毫不逊色于其他星座的摩羯,其实说到底,还是要拥有一份稳定的事业的时候,才去恋爱,可以有一种安全感的。 十一、【水瓶座】 最佳恋爱时期:28-32岁 水瓶座的人一般都是比较晚熟的,他们的思维常常会让人觉得无法把握住,有时候也不大懂得如何与恋人进行更好地沟通。年纪较早的恋爱虽然美,但是容易给自己留下遗憾与后悔。恋爱的最佳时期,还是等成熟之后再说吧。 十二、【双鱼座】 最佳恋爱时期:22-26岁 对于恋爱,双鱼座们总是持着相当浪漫的想法的,他们无论是在哪一个时期,即使老了,也会依然对爱情抱有幻想。可是适合他们恋爱的最佳时期,果然还是需要趁着没有被生活拖累的时候,浪漫起来,羡煞旁人。 如果满......余下全文>>
是用 阳历 哦 农历 是 中国的 星座 是 外国的 所以 是 阳历
圆融不收的,不过也相对难抢一点,一到假日好多人停过去。 久光是三小时内免费