Visual Basic在风水软件中的应用

李矿　于立红

摘要：论述了使用VisualBasic技术，详细分析了东、西四命局和东、西四住宅之间的搭配及作用关系，从而产生的吉凶祸福意义，对求测者选择住房具有一定的参考价值。该文的重点是VisualBasic技术在易学中的应用与交流，八宅风水的科学性与否该文不予讨论。

关键词：VisualBasic；八宅风水；东四宅；西四宅；吉凶祸福

中图分类号：TP311

文献标识码：A

文章编号：1009-3044（2017）10-0053-02

1.序言

八宅风水，是风水学中最古老的一门流派，属于理气派风水，八宅按“坐向”或“门向”，把住宅分为东四宅和西四宅；同样把居住之人分为东四命和西四命；八宅派认为，东四命的人住东四宅则吉，住西四宅则凶。同理，西四命的人住西四宅则吉，住东四宅则凶。

本文借助Visual Basic技术计算居住之人的东、西四命，以及住宅的东、西四宅，并分析宅命相配及作用方式，总结其产生的吉凶祸福意义，分析推理某一命局的最适合的居住环境，从而为求测者提供居住和生活的行动指南。

2.东、西命局的判断

按照八卦九宫，坎一、震三、巽四和离九命宫属于东四命局，坤二、乾六、兑七和艮八命局属于西四命局。命局的计算方法是：1999年及之前出生的男命以100减去出生年份，除以9，取余数，女命以出生年份加5，除以9，取余数，分别定命宫。2000年及之后出生的男命99减去出生年份，除以9，取余数，女命以出生年份加6，除以9，取余数，分别定命宫。余数即为命宫，如果被9除尽，余数为零，则为离九宫命，若余数为5时，男命为坤二宫，女命为艮八宫。VB编程m如下：

在程序运行过程中，只需输入求测者的出生年份和.陛别，程序快速准确地计算并输出求测者的所属命局，减轻人工推算的麻烦，大大提高了判断效率。

3.八宅派风水场的处理

八宅派风水先按“坐向”或“门向”起伏位，城市楼房以门向起伏位，按照顺时针方向，依次确定八个宫位的所处的东、西四宅宫位。在程序中使用Visual Basic的一维数组-引存放各宫位风水场，规定数组第一元素从伏位开始，依次按顺时针以开门方位起伏位，分别是乾门、坎门、艮门、震门、巽门、离门、坤门、兑门八个方位开门，共八个伏位。在程序界面中，制作八个单选按钮，分别取乾门、坎门、艮门、震门、巽门、离门、坤门和兑门，由风水师依据罗盘测定的门向方位，选择开门方向，以此确定伏位。Visual Basic编程如下：

Dim bzgw（8）As String，fwqc（8）As String

bzgw（1）=”伏位六煞天医五鬼祸害绝命延年生气”开乾门

bzgw（2）=”伏位五鬼天医生气延年绝命祸害六煞”开坎门

bzgw（3）=”伏位六煞绝命祸害生气延年天医五鬼”开艮门

bzgw（4）=”伏位延年生气祸害绝命五鬼天医六煞”开震门

bzgw（5）=”伏位天医五鬼六煞祸害生气绝命延年”开巽门

bzgw（6）=”伏位六煞五鬼绝命延年祸害生气天医”研离门

bzgw（7）=”伏位天医延年绝命生气祸害五鬼六煞”开坤门

bzgw（8）=”伏位生气祸害延年绝命六煞五鬼天医”开兑门

Dim i As Integer.km As Integer

if fw（1）Value=True Then

km=1

ElseIf fw（2）.Value=True Then

km=2

Elseff fw（3）.Value=True Then

km=3

ElseIf fw（4）.Value=True Then

km=4

ElseIf fw（5）.Value=True Then

km=5

ElseIf fw（6）.Value=True Then

km=6

ElseIf fw（7）.Value=True Then

km=7

Elseff rw（8）.Value=True Then

kin=8

EndIf

Fori=lt0 8 Stepl

fwqc（i）=Mid（bzgw（km），i*2-1，2）

Next T

其中fwqc数组中存放的是八种风水气场，根据用户大门的开向方位，依次顺时针取八宫方位的八宅风水场输出到程序界面上，可清晰显示出房屋八个方位的风水场。其中吉的风水场有：伏位、生气、天医和延年。凶的风水场有：六煞、五鬼、祸害和绝命。

4.吉凶结果分析

按照八宅派的宅命相配理论，所属命宫之人根据其所居住的方位，推算出宅命作用形成的风水场，通过查找八种风水场产生的吉凶祸福表格，分析求测者的命运走向。如宅命作用方式是五鬼火，五鬼火为大凶，属于贼火，专攻隐私部位，主女人得妇科病（子宫肌瘤、宫颈糜烂、乳腺肿块）；男人血压高、心脏病、心血管疾病（脑溢血、偏瘫、脑积水）；主睡眠差、多梦；小孩发烧；青少年发脾气、烦躁、浮躁、打架斗殴、丢三落四；中年多梦；老年先多梦，然后患心脏病。财务放此处容易被盗。易受锐器伤（刀伤、烧伤）、偷、抢、车祸、着火。主吃官司、口舌是非等。专伤老二，或二把手，年月应期寅午戌等等。

5.结束语

在实际的八宅风水分析及预测中，尽管软件能提供预测的理论依据，但如果能配合风水师的实践经验进行综合分析，将大大提高判断和分析的準确率。对求测者日常学习和生活、行动具有更好的指导意义。