当前位置:驴友阁首页 >> 风水知识 >> 四柱八字 >> vb编个 测星座的程序
测八字程序

vb编个 测星座的程序
  两个标签。两个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 "射手座"  5562 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 = "无往不利,全力打拼。想让你安定下来、今天是个好时机、平时花钱很随兴的你,突然想作财务规划!9529今天会做一项重要决策!相信自己准没错,"   Case "巨蟹座"   s = "别老待在家里、今天是出外走走的好时机,和亲爱的他到户5495外踏青去,有9703场聚会将会让你破费!提升自己的竞争力。应接触些平时2091不懂的业务,"   Case "狮子座"   s = "收起尖锐的利爪、今6735天凡事好商量,强势的狮子成了0142温柔的小猫,只想依偎着心爱的他?会为家人购买一些小礼物!有人找你帮忙处理公务。你不好意思拒绝。"   Case "处女座"   s = "拓展生活圈。建立新关系的好时机!单身的人将感到特别地孤单!很期盼爱情降临。和朋友共同讨论合资的计划?工作: 要妥善处理合作案的细节? "   Case "天秤座"   s = "对事情能够屏除偏见,具有客观,冷静判断力的一天。对自己理念的坚持!让你在态度上也强势了起来。之前投资的都有获得回报的迹象,今天你让人感觉成0292熟稳重!可托付重任的样子!"   Case "天蝎座"   s = "顺路经过感兴趣的店。不妨6342进去看看、不要排斥相亲或是朋友介绍。也许会遇到不错的人选唷!适合出门逛街买些秋冬用品、初次相见的人特别值得注目。你从身上可学到不少东西,"   Case "射手座"   s = "年长的朋友可望对你提出有益的建言、今天是个适合向亲密朋友吐露心事的日子。为了讨好情人!不惜打种脸充胖子!要注意对长辈或年纪较长者。要比平常更客气一点的言词相待、"   Case "摩羯座"   s = "不论自己心情如何都要隐藏起来,多保持笑容才拉近与他人的关系!即使是亲密的人、还是要尊重对方的自尊心!真心诚意帮助别人、也是为自己开运。为了处理别人的事,自己的事都没做到一天就结束了,"   Case "水瓶座"   s = "是个不能一心二用的日子、顾得了东就顾不了西。力量宜集中在一件事物上、看人不能只看外表、小心有跌破眼镜的时候、一感到苗头不对!就要有修正计划的应变措施!心急的要求成果、反而越搞越乱、其5546实慢慢做的话、倒是还能蛮顺利就解决了!"   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!
怎么测八字?
  命理学也称四柱又称八字,是指人出生的时间!即年,月、日!时。在人用天干和地支各出一字相配合分别来表示年?月!日!时、如甲子年、丙午月,辛丑日。壬寅时等,每柱两字,四柱共八字!所以四柱预测又称"批八字"!"测八字",5374也叫四柱推命,依照天干、地支阴阳五行属性之相生,相克的关系!推测人的吉凶祸福!如果你搞明白了其中的奥秘、那么自己批八字也完全是可能的。   天干有十个:甲!乙、丙。丁、戊、己!庚,辛!壬、癸、   地支有十二个:子!丑。寅!卯!辰,巳。午!未,申,酉,戌、亥,   二者顺序配合可以产生六十个单位、叫六十甲子、那生出生的年。月!日。时分别用天干。地支配合来表示,正好有八个字,因此叫生辰八字。又叫它是人的四柱,   具体介绍如下:   一、排年柱   年柱,即人出生的年份功干支来表示,注意:上一年和下一年的分界线是以立春这一天的交节时刻划分的,而不是以正月初一划分。如某人阳历2000年2月4日22点17分生,由于阴历2000年交立春是阳历2000年2月4日20点32分,因此此人的年柱为2000年之庚辰,而非1999年之已卯!   二,排月柱   月柱,即用干支表示人出生之年月所处的节令!注意月干支不是以农历每月初一为分界线,而是以节令为准,交节前为上个月的节令,交节后为下个月的节令,   阴历以十一月为子月。十二月为丑月!一月为寅月,以下依次为二月卯月,三月辰月,四月巳月!五月午月。六月未月、七月申月、八月酉月!九月戍月。十月亥月,但相者所说的十二月有所不同!是以二十四节气为标志的、   这样,只要5372知道了生日是阴历几月。就知道了生月的地支?   三,排日柱   日柱,即用农历的干支代表人出生的那一天.干支记日每六十天一循环,由于大小月及平闰年不同的缘故,日干支需查找万年历、另外,日与日的分界线是以子时来划分的,即十一点前是上一日的亥时,过了十一点就是次日的子时.而不要认为午夜十二点是一天的分界点,   生日的天干地支的推算是非常复杂的、它是由古代相者定下了某一天的干支、然后依次推下来的、要知道生日的干支、只能查万年历!而且是阴阳历对照的万年历!如果不知道生日是阴历多少、都可以查万年历,   四、排时柱   时柱,用干支1025表示人出生的时辰.一个时辰在农历记时中跨两个小时,故一!
网上程序测名起名能否信赖?
  现实中经常遇到这样的事例:有人拿着网上程序测得高分的名字来求测、经过测算。发现这些名字并不吉利!很多还存在着伤灾!车祸。离婚。官司等标志,他们很是疑惑:到底是网上程序可信、还是现实测名可信, 本人不会编程!不敢妄断程序的正误、但相信电脑是人发明的、程序也是人编的、不管再精深,还是不如人脑灵动吧, 现在流行的五格姓名学,从清末民初传入中国以后!由于历史的原因,大半个世纪一直处于停滞状态、真正被重新宣传认识!也是80年代以后的事了!经过90年代的普及。到现在的姓名热。不过短短二十余年的时间、但却发生了很大变化,这门学问一直在发展完善过程中。一直不断有旧的不科学的理论被验证推翻,一直不断有新的科学准确的方法被发现问世。这是一门实践的学问,一门运动的学问、这门学问发展变化的步伐。是电脑程序望尘莫及的、而且这门学问应属“易”学范畴!“易”的东西本来就很“玄乎”!很具变化性!需要发挥人的主观“灵动性”才能为之,岂是那些死板教条的程序所能从事的! 从电脑测名的情况来看,其测事的准确性很低。几乎没有多少参考价值、你同时测一个教授的7474名字和一个乞丐的名字,其结果往往是乞丐的分数比教授的高,既便是给你打了个高分!也不过使你“乐活”一下、满足一点虚荣心而已!但却把名字的真相给掩盖了!难以起到趋吉避凶的作用,不过、作为一种游戏方式、倒是有一定娱乐价值的, 至于电脑程序起名,那更是滑稽可笑了!笔者曾经试用过一些在线起名的软件!一次输入一个姓氏。就可以给出30个名字、但经过测算、这些名字几乎没有五格全吉的。而且三才相克、婚姻不顺,不利健康等标志比比皆是!试想这样糟糕的名字!能为你带来好运吗, 再者、电脑起出的名字、并不能真正结合生辰八字、并不能与八字喜用五行相符,因为电脑没有这个能力“算命”,单只一个“用神忌神”?现实中的大师们尚且难以“捕捉”确定、需要扎实的八字功夫,以及天赋的“灵感”、才能判断准确!何况死板程序化的1689电脑呢,所3776以电脑程序起出的名字?不管1933有多好听、但很难与八字喜用相符,更难起到后天调整的作用了、 不过!现在仍有很多人“迷信电脑”!认为那是“高科技”的玩意?比人高明、况且又不花钱、所以采用电脑程序给自己改名。或给孩子起名,殊不知受害不浅,还蒙在鼓里呢,,
测个八字 丁巳 戊申 甲子庚午
  日柱太弱,假从格,八字食伤生财,一生钱财不缺、就看怎么努力去赚大钱、胆子大!能说会道。语言表达能力强!8212花钱比较大方、行火土运,最好、婚姻方面不顺,你对配7226偶要求比较高、爱说配偶、婚前有男朋友被夺,婚后夫妻之间多沟通,否则婚灾难免,
算八字测姻缘!
  现行丙寅运(2013-2023)   2015乙未年,夫妻宫乙木透出,和老公遇见了, 7305  2016丙申年,子申合!官星和财星合?巳申合、劫财代表身体和官星相合。卯申暗合、卯为印、居于夫妻宫代表结婚证!综上!是正式结婚的时候!!
免费八字测生男生女
   没有一点科学依据,传说中的清宫古墓表格,经我们临床对照。没有任何参考价值,。
测八字测的比较准的有什么网站
  请问1341你要测算哪方面的呢,!
帮测一下八字命格
  出生公历:1985年1月31日0时0分(北京时间),星期四!   出生农历:甲子年 十二月 十一日 子时?   才 官 日元 杀   乾造 甲 丁 庚 丙 (日空戌?亥)   子 丑 午 子   藏干 癸 癸辛己 己丁 癸   伤 伤劫印 印官 伤   地势 死 墓 沐浴 死   纳音 海中金 洞下水 路旁土 洞下水   节气:小寒:1985年1月5日17时35分、立春:1985年2月4日5时12分、   起大运周岁:1岁 4个月 26天,每一交大运年 6月 26日起运(公历),   排大运:   枭 印 比 劫 食 伤 才 财   大运 戊寅 己卯 庚辰 辛巳 壬午 癸未 甲申 乙酉   绝 胎 养 长生 沐浴 冠带 临官 帝旺   岁数 2 12 22 32 42 52 62 72   年份 1986 1996 2006 2016 2026 2036 2046 2056   命局生克制化:   ※五行个数(计入藏干): 3死水 1囚木 3休火 2旺土 2相金   五行个数(不计藏干): 2死水 1囚木 3休火 1旺土 1相金   五行力量:水34(13.1%) 木28(10.8%) 火94(36.3%) 土54(20.8%) 金49(18.9%)   己生助力量:103(39.8%) 克泄耗力量:156(60.2%)。 阴气:150(57.9%) 阳气:109(42.1%)!   ※日主综合得分:-44! 日元偏弱,喜用土、金(印枭。比劫),忌仇木。水(财星!食伤)!   庚金生于丑月、土旺,金相。火休、木囚。水死。 生于寒冷冬季。八字可适当借火调候。   调候用神:丁!甲!丙,丙不可缺。   ※此命局未入正格!   比肩 1位相(045,17.4%),劫财 1位相(004,1.5%),合计力量(049,18.9%)   食神 0位死(000,0.0%)。伤官 3位死(034,13.1%)、合计力量(034,13.1%)   偏财 1位囚(028,10.8%)!正财 0位囚(000,0.0%)、合计力量(028,10.8%)   七杀 1位休(036,13.9%)!正官 2位休(058,22.4%),合计力量(094,36.3%)   偏印 0位旺(000,0.0%),正印 2位旺(054,20.8%)、合计力量(054,20.8%)   ※天干无合。地支有子丑年月六合,9240子午年日相冲,丑午月日相害,丑8391子月时六合、午子日时相冲!   ※提示:这一步给出了整个八字最有价值的信息!用数量化表示、容易理解把握、论命者要有意识的综合利用这0974些数据,切记!※   三命5785通会论断:   ◆庚日丙子时生?是身与鬼都衰弱。9988庚金以癸水为伤官,以丙火为鬼,子上庚金死绝!丙火无气。癸水健旺。如果自身有依托!那就吉利、无依托的,又行身3226衰鬼旺运、那就身遭暴疾,贫困低贱、通火气月。要行西方运,才贵显。自身衰弱则不是这样。   ◆庚午日丙子时生!贵显!子时午日相冲、忧伤妻子儿女、最好行西方!南方运,那将是三3877四品的御史、秋天生、丙火无气。生儿育女困难!忌的是己巳月!碰上了破损祖业。凶险,逢己亥月。将被抢劫盗窃。有凶险,逢癸丑月,孤独、   ※提示:单以日时论命显然有失偏颇!但给出的断语6911可以为分析八字起提醒的作用、经典名著自有它的深意!※   穷通宝鉴-调侯用神参考:   庚日丑月生(丙,丁。甲)   (1)庚日、丑月生者,其时寒气更甚!丑为混6950泥之土?则金愈寒冻,故应先取丙火解其寒性、再次丁、甲9408来治炼庚之刚金,丙丁透尽时。不能自然发达。需借他人之力。方能功成名就,   (2)命中有丙,但无丁。甲时、为小富小贵之命。即寒金逢阳火!谓之“日月对映掐”、庚为月之秸.丙为太阳、故称日月对映,为富贵1143双全之命,   (3)命中有丁,甲、但无丙时.3628为一特达之人才。即以丁之火来冶炼庚金?以甲木来助丁火。为一贵命,   (4)命中有丙。丁!但无甲时、为白手成家之命!即以火暖其暖气之好命,可致3956富但不能显贵?   (5)庚日丑月生者,举一例如下、   生年 己 已 生年 己 巳   生月 丁 丑 生月 丁 丑   生日 庚 子 生日 庚 子   生时 甲 申 生时 乙 酉   以上之命!为一对双9964胞胎之命!上段为兄、,
求测八字喜用神
  出生:公元1983年1月21日10时45分(阳历)   农历:一九八二年十二月初八日巳时   当月节气:小寒(1月6日5:55)、 中气:大寒 (1月20日23:13)   生辰八字:7259壬戌年 癸丑月 己酉日 己巳时     一?你的八字命盘     下列是你的八字命盘。你是黄鸡、出生於黑狗年。 日天干0520代表你!所以你是属土。   年 (祖先) 月 (父母) 日 (自己) 时 (子孙)   阳水 阴水 阴土 阴土   黑狗 黑牛 黄鸡 黄蛇     八字命盘从阴阳干支三合历取得,上排是天干!由五行「金水木6825火土」轮流排列?下排是地支!用十二生肖顺序排列、十二生肖可转换成五行。     二。你的五行得分和喜神     下列算出你命盘中五行的分数   五行 木 (日主自己) 火 (体智外泄) 土 (钱财享受) 金 (职位压力) 水 (保护求知)   分数 0 9 33 20.52 25.3     八字五行得分情况:   火9; 土33; (同类得分:42)   木0; 金20.52; 水25.3; (异类得分:45.82)   相差:-3.82??综合旺衰得分:-3.82??八字比较平衡   八字喜用神:八字比较平衡,八字喜火、火就是此命的「喜神」。     八字论命是在找五行阴阳的平衡。同类和异类得分基本相同时,五行阴阳较平衡,一生较顺利,当同类和异类得分相差过大时!人生八字就过硬或过弱!一生起伏较大!喜神的选择一般从得分最少的哪一类中选取,此类中值最少的五行就是你的「喜神」或称「有用之神」!当「喜神」来自流年或大运时。命盘的五行会较平衡。平衡的五行较不会打架。换言之,不愉快的事会减到最低点!那一年就会较幸运,八字就是从这个平衡理论。去分析人一生的起落!这里,我们就选火当做此命的「喜神」、     三,你的大运     出生后从4岁9月4天上运。逢丁、壬年9902的寒露后第20日(公历10月28日前后)交运!   在交运期前后您的命运将有重大的改变和吉凶极端的际遇,凡事宜谨慎!     大运十神: 正官??七杀?? 正印??偏印?? 比劫?? 比肩??伤官?? 食神   大运干支: 甲寅??乙卯?? 丙辰??丁巳?? 戊午?? 己未??庚申?? 辛酉   交运年份: 1987??1997??2007??2017??2027??2037??2047??2057   交运年龄:?5???15???25???35?? 45???55???65???75     四! 近十年运气     2005年 2月 4日~2006年 2月 4日:   如花开时便凋残、恨杀无情风雨催、   冲财生挫折、不宜远走求财,   十神为七杀:其表象范围大多与武职、军衔!诉讼!外敌、建筑。以及儿女。女性的情人等有关!   吉象:做事干脆利落?工作效率高!较易文成武就,侠义助人受人感激。名声显赫,有地位或有权威、   凶象:个性太张扬。聪明反被聪明误!自己容易受损失、生活起伏较大。身体易受伤残。女性早婚不利!     2006年 2月 4日~2007年 2月 4日:   无端夜雨迷秋月。不意狂风折好花、    财源广进!有购置建设等好事、    十神为正印:其表象范围大多与学业!艺术!以及长辈。师长。母亲。女婿等有关,   吉象:自己的天赋较易发挥、学业艺术方面有发展。   凶象:劳神费心,工作受自己的情绪影响较大!女性不利子女。     2007年 2月 4日~★2007年 10月 28日:   飞符为患又为灾,7232啾唧无端水破财!   有得有失。存款宜购置、平运,   ★2007年 10月 28日~2008年 2月 4日:   风漾柳枝无气力。淡时月影未分明。   防小人暗算,不可赌博。守为吉,   十神为偏印:其表象范围大多与学术研究。爱好特长!以及长辈。 贵人。母亲等有关!   吉象:较......余下全文>>,
线上测八字和五行缺什么
出生公历:2009年8月18日22时40分(北京时间)、 9268出生农历耽己丑年 六月 廿八日 亥时! 坤造 己丑 壬申 乙未 丁亥 土土 水金 木土 火水 [五行全] ※五行个数(计入藏干): 4相水 3死木 2囚火 4休土 2旺金 五行个数(不计藏干): 2相水 1死木 1囚火 3休土 1旺金 五行力量:水114(35.4%) 木28(8.7%) 火35(10.9%) 土80(24.8%) 金65(20.2%) 己生助力量:142(44.1%) 克洩耗力量:180(55.9%)、 阴气:145(45.0%) 阳气:177(55.0%), ※日主综合得分:-52, 日元偏弱、喜用水!木(印枭、比劫),忌仇土!火(财星!食伤)。 生于申月。金旺,水相。土休、火囚。木死。 姓名评论:从您的生辰八字来看。您的名字中宜有水、木!不能有土。火。如此才能平衡先天阴阳五行禀赋,起到扶持个人命运的作用 尊姓大名:王丽颖,各字笔画4。19!16! 王 天格:05(土) 丽 人格:23(火) 颖 地格:35(土) 总格:39(水) 外格:17(金) 【王】wáng 、4画,字意:一生清雅荣华,双妻之格,中年奔波!成功隆昌。(土5297) 【丽】lì ?19画,字意:清秀多才!妻贤子贵、中年平凡、忌车怕水、(火) 【颖】yǐng 、16画,字意:智勇双全!义利分明、中年平凡,晚年吉祥!,(木) 姓名综合得分:86分 ★天格5数理含义:(种竹成林 ):福禄长寿的福禄集合数、(吉) 含义:阴阳交感,和合。完璧之象、隐藏大成功运、 精神敏锐!身体健全、福禄长寿!富贵繁荣! 无所不至或为中兴之祖!或在他乡成家,或复兴绝家。即或不如此! 也会博得功名荣誉、圆满无碍福祉祯祥无比! ★人格23数理含义:(壮丽):旭日东昇发育旺盛数,(吉) 含义:伟大昌隆之运!威势冲天之象,微贱出身、逐渐长大,终至首领!有如凯旋之将。3185猛虎添翼之势。权力旺盛,致胜事业,功名荣达,大志大业可成!但平常气血强旺、临事恐过度而为憾!然而感情锐利、壮丽可爱! 实属贵重的运数、 但女性有此则不及此,其理由同于二十一数! 妇女凡主运以及他格有此数者、难免转成零落而绣榻悲寒也! ★地格35数理含义:(高楼望月)温和平静的优美发展数!(吉) 含义:温良和顺之象,有智达的能力!在文艺技术方面定能发展而奏功洋洋,若怀大志!欲为大事者,宜大振力气!彻底节义!以补不彻底的赋性和权威号召力。因其缺少谋略气魄。故此数实为保守平安的吉祥数。所以此最适合女性。为男性则倾向消极、 ★总格39数理含义:(富贵)富贵荣华的变化无穷数!(吉) 含义:此数为祸乱一过!反成幸福贵重之格!权利,长寿。财帛丰富,德泽四乡。财富盈身!富贵已极、暗埋悲惨之象。所谓物极必反。切勿轻用之,妇女若有此数者必陷孤寡。 ★外格17数理含义:(坚操):突破万难的刚柔兼备数、(吉) 5984含义:权威刚强!有已无人、以5480至与人不和? 如善于避开此短处,则为大吉,意志坚定。 具突破万难的气节是3759其最大的优点!如过于无理任性,恐反成失败,如果立志勇往向前, 必成功而建大业,若陷过刚而变固执!必招厄患、切要警戒, 妇女有此数者易流于男性如果能涵养女德。存心温和、 福禄自然随之?但先天条件弱的妇女!反要用此数为妥! 三6572才配置[土火土]!对人命的诱导和影响: 极易达到目的......馀下全文>> ?





服务保障

Copyright © 2005-2024 , All Right Reserved 版权所有 驴友阁,并保留所有权利