中小企业经营诊断及最优决策

1、第 PAGE 20 页 共 NUMPAGES 20页中小企业经营诊断及最优决策首都师范大学数学系 卞文良、张 蒙指 导 教 师 焦宝聪改革开放二十年来，我国中小企业取得长足发展，已成为国民经济发展的重要支柱力量之一。首先，中小企业在国民经济许多行业和领域具有突出优势，发挥重要作用；而且，在安置就业方面具有大企业不可替代的作用。当前市场经济条件下，我国中小企业的经营管理正朝着现代化，国际化的方向发展，并取得了喜人的成果。然而，由于种种原因，中小企业中经营决策靠简单的经验办事的现象仍然存在，部分企业领导者缺乏经营管理方面的系统训练也是事实。这和我国即将加入WTO，企业经营管理要求上层次，与世界接轨

2、的趋势相悖。所以研究怎样提高企业的决策管理水平就愈显重要了。一、引言言 中小企企业经营营诊断及及最优决决策这这一项目目正是着着眼于中中小企业业管理决决策上的的几种常常见弊病病，并力力求设计计一个解解决此类类问题的的适用软软件。 项目开开发从最最初的立立项、调调研，中中期的学学习、讨讨论，到到后期的的制作、检测、分析历历时近一一年。前前期的调调研我们们从一些些企业的的具体情情况入手手，或与与之接触触，谋求求合作；或查阅阅资料，统计数数据。前前后历时时两个月月，并为为以后的的工作打打好了良良好的基基础，软软件的制制作也能能有的放放矢。 中期我我们认真真组织了了学习、讨论。针对调调查中发发现的问问题

3、以及及一些常常见弊病病，我们们学习了了解决它它们的各各门知识识：线性性规划，运筹学学，风险险理论，对策论论，最优优化理论论等等。并加强强了计算算机软件件开发能能力的学学习和训训练。真真正为软软件的开开发成功功打造了了精良的的装备。于后期的的制作，我们也也进行了了多轮的的讨论。现在的的软件也也是我们们讨论多多次才逐逐渐定下下来的，然而还还不完善善，仍有有一些地地方须认认真讨论论。至于于测试、 打包包各项工工作都已已陆续完完成。二、内容容简介 我们们的软件件在设计计、制作作过程中中紧紧围围绕着先先进的管管理思想想与缜密密的数学学理论相相结合的的宗旨。与同类类其他的的软件相相比，它它具有更更深厚的的

4、理论内内涵，且且对于一一般的中中小企业业管理决决策问题题的解决决都有一一定的指指导和启启发作用用。下面我们们将软件件的具体体内容作作一个汇汇报 软件的的核心部部分分成成两大块块：企业业评价；企业诊诊治。 企企业评价价包括杜杜邦财务务分析法法和企业业破产危危险预测测法两个个模块； 企业诊诊治包括括层次分分析、风风险决策策、线性性规划三三个模块块。杜邦财务务分析在这部分分的分析析中，主主要用了了杜邦财财务分析析的方法法。杜邦邦财务分分析方法法是在对对企业的的偿债能能力，企企业资金金周转状状况，企企业获利利能力进进行综合合分析的的基础上上，按照照各比率率之间内内在的相相互制约约与影响响的关系系串联起

5、起来，所所构成的的财务分分析体系系。具体体情况见见下图：从上图中中我们可可以看出出，权益益报酬率率是一个个综合性性最高的的具有代代表性的的财务比比率，他他是杜邦邦财务分分析体系系的核心心和枢纽纽。它反反映了企企业财务务管理的的重要目目标，即即所有者者财富最最大化。而权益益报酬率率的形式式及水平平取决于于资产在在各个环环节的运运作效果果。进行杜邦邦财务分分析体系系的分析析，便于于我们发发现企业业财务的的运作是是在哪个个层次的的哪个环环节出了了问题。比如，权益报报酬率未未达预定定目标，可能是是总资产产报酬率率偏低或或权益乘乘数太小小或两者者兼而有有之；若若总资产产报酬率率不低，权益乘乘数太小小则反

6、映映出企业业财务结结构过于于保守，进而反反映出经经营者的的风险及及进取精精神不足足；若总总资产报报酬率为为负，权权益乘数数过大，必会使使权益报报酬率负负向放大大。又如如，总资资产报酬酬率偏低低可能是是销售净净利润率率太低，也可能能是资产产周转速速度太慢慢，若为为总资产产周转太太慢，则则可能是是资产结结构不佳佳所致，等等。究竟是是哪个层层次的哪哪个环节节出了问问题，可可以对照照杜邦财财务分析析体系层层层分析析，找出出原因并并采取相相应措施施予以解解决。破产危险险预测法法对于一个个经济效效益不是是很好的的企业来来讲，进进行破产产分析，及早的的对企业业所面临临的危机机有一个个比较清清楚的认认识是十十

7、分必要要的。在在诸多破破产分析析方法中中，最为为简洁，又准确确有效的的就是阿阿尔特曼曼破产判判别函数数。阿尔特曼曼判别函函数的表表达式为为：Z=00.0112X11+0.0144X2+0.0333X3+0.0066X4+0.9999X5这里， X1=流动动资本/总资本本 X2=保留留利润/总资产产 X3=利息息及扣除除税款前前纯利润润/总资资产 X4=企业业持股份份额的市市场价值值/总负负债的帐帐簿价值值 X5=销售额额/总资资产 Z=综合合指数 X1是流流动资本本和总资资产相比比所得的的比率，是企业业的纯流流动资产产占全部部还原资资本的比比例。流流动资本本是流动动资产和和流动负负债的差差额。

8、这这个比率率表现了了流动率率和规模模的特征征。一旦旦营业损损失持续续下去，流动资资产就变变小。在在流动性性比率中中，这个个比率最最为有效效。X2是表表示积累累的收益益力指标标，从前前被当作作新东西西。比较较年轻的的企业只只能表示示低保留留利润（法定预预备金加加剩余金金）对总总资产的的比率。因此用用这个指指标分析析，可以以断定年年轻企业业是不利利的。X3是利利息和没没扣除税税金前的的纯利润润所占总总资产的的比例，因此他他表示企企业真正正的生产产效率。当总负负债超过过用资产产收益力力评估的的资产价价值引起起不能支支付的时时候，正正是企业业破产的的时候，所以这这个比率率也是表表示破产产的重要要指标。

9、X4 是是企业持持股份额额的市场场价值和和总负债债帐簿价价值的比比率。企企业持股股份额的的市场价价值用普普通股和和优先股股合并计计算的股股份资本本的市场场价值来来表示，负债是是长短期期负债合合并计算算。这个个指标表表明，负负债超过过资产的的企业在在破产前前其资产产价值能能跌落到到什么地地步。用用这个比比率当破破产指标标，比纯纯资产对对总资产产的比率率当破产产指标更更好一些些，现在在对破产产比率的的研究，不用总总资产市市场价值值的概念念是一个个特点。X5是销销售额对对总资产产的比率率，表示示总资产产的周转转率。但但在乘系系数的时时候，只只这个比比率用次次数，不不带 % 。这这个指标标是表示示企业

10、销销售力和和竞争力力的重要要指标。 ZZ 是最最后得到到的综合合指数，也是判判断企业业是否面面临破产产的最主主要的参参数。在在长期的的追踪预预测结果果和对结结果的统统计分析析基础上上，得出出了综合合指数ZZ 的临临界值是是2。当当Z小于22时，企企业面临临破产的的危机，Z值越小小，这种种破产危危机越严严峻；当当Z大于22时，企企业经营营状况良良好，ZZ值越大大，企业业的经营营状况越越良好。其中，1.881到2.667之间间称为交交叉地带带或无知知地带，Z值在这这一区间间的企业业应对自自己的经经营状况况进行调调整，理理顺各方方面的矛矛盾问题题，早日日跳出灰灰色地带带（交叉叉地带），摆脱脱破产危危

11、机。 层次分析析法层次分析析法（AAnallytiic Hieerarrchyy Prroceess， 简称称AHPP）是一一种特别别适合具具有复杂杂结构的的多目标标决策分分析技术术。它的的特点是是将决策策问题的的目标,多种层层次因素素及方案案等的分分析，构构造出层层次结构构，结合合主观判判断信息息作出定定量分析析的方案案优序排排列，它它将决策策者的思思维过程程实现数数量化，模型化化，既简简化了问问题的系系统分析析计算， 又有有助于使使决策者者保持其其思维过过程的一一致性。具体步步骤简述述如下： （1） 明确问问题：要明确问问题的范范围，了了解具体体的决策策目标要要求，所所包含的的因素以以及各

12、因因素间的的关系，解决问问题的备备选方案案或具体体措施。同时， 对使使用AHHP是否否掌握充充分的信信息做出出判断。（2）建建立层次次结构根据对问问题的上上述分析析，按各各因素间间的关系系及隶属属关系， 将全全部因素素分成不不同层次次， 形形成最高高层次， 若干干有关的的中间层层和最低低层的多多层次结结构模型型。最高层：表示解解决问题题的目的的，即决决策目标标。中间层：表示采采用某种种对策或或措施来来实现决决策目标标所涉及及的中间间环节。 一般般会有策策略层，约束层层，准则则层等等等。最低层：表示解解决问题题的对策策或措施施。决策目标 准则 3准则 2准则 1子准则 1子准则 3子准则 2方案

13、 1方案 3方案 2（3）构构造判断断矩阵建立层次次结构模模型后， 进行行逐层逐逐项的两两两比较较， 即即每一层层次各个个元素， 针对对上一层层某元素素的相互互重要性性给出判判断评分分数值，开方成成判断矩矩阵。判判断矩阵阵是AHHP法的的关键一一步。假定A 层中元元素aiij与下下一层次次B1，B2.，Bn有联系系 比较较后得下下面形式式的判断断矩阵。a kB1 B2 BB3 Bnn B1b11 bb12 b133 b1nn B2b21 b222 b233 b2nn Bnbn1 bn22 bnn3 bnnn其中biij表示示对于上上层a k元素而而言，BBi对Bj的相对对重要性性， bbij的

14、判判断评分分数值，通常11，2，3，.99及其倒倒数， 其含义义下表说说明。评分值含 义 1表示两因因素相比比， 具具有同样样重要性性3表示两因因素相比比，一个个因素比比另一个个因素稍稍微重要要5表示两因因素相比比，一个个因素比比另一个个因素明明显重要要7表示两因因素相比比，一个个因素比比另一个个因素强强烈重要要9表示两因因素相比比，一个个因素比比另一个个因素极极端重要要2上述两相相邻判断断的中值值468倒数如果因素素I与因因素J 比较得得判断BBij，则则因素JJ 与因因素I比比较的判判断Bjji=11/Biij（I不等于于J）判断矩阵阵中的具具体数值值来自资资料或专专家意见见。 若只考考虑

15、只有有一层标标准层时时Ak方案1方案2方案n方案1b111b12B1n方案2b21b22B2n方案nbn1bn2Bnn （44）求各各因素权权重的过过程 首先， 用两两两比较较矩阵来来求出各各方案在在a1,aa k， 这这k个方面面的权重重，各方方案在某某一方面面的权重重组成的的列向量量称作在在a i这个方方面的特特征向量量（i=1，2.k） 第一步步，先求求出两两两比较矩矩阵每一一列的总总和； 第二步步，把两两两比较较矩阵的的每一元元素除以以其系相相应列的的总和， 所得得商所组组成的新新矩阵称称之为标标准两两两比较矩矩阵； 第三步步，计算算标准两两两矩阵阵的每一一行的平平均值，这些平平均值就

16、就是各方方案在aai方面的的权重。 另外， 还应应求得每每个标准准ai在总的的决策方方案里的的相对重重要的程程度，即即要取得得每个标标准相对对的权重重，即每每个标准准的特征征向量。方法同同上。 （55）利用用权数或或特征向向量求出出各方案案的方案案优劣次次序设我我们在上上面已经经求得在在k 个方方面的kk个特征征向量为为A1，A2 .Ak Aii=(aa1i a2ii aani )* ajii 表示示第j个方案案在第ii个方面面的权重重 设设各个标标准（方方面）在在总目标标中所占占的重要要性（权权数）的的向量为为M M=(m1 m2 mmk)* mmi为第第i个方面面的权重重所以(AA1，AA

17、2 .Ak)是一个个nk阶的矩矩阵，MM是一个个k1阶的矩矩阵。令令 N=(n11 n2 nk)*=AM是是一个nn1阶的的矩阵，即一个个n维列列向量其其中nii表示第第i个方面面在总目目标中的的总得分分。 通过比比较所知知，N中中最大的的数对应应方案便便是最优优方案， 即最最后的决决策方案案。风险决策策不确定情情况下的的决策有一类决决策问题题，决策策者虽然然知道未未来所能能发生那那些自然然状态， 但却却无法预预先估计计或预测测各种可可能状态态发生的的概率， 这就就是未确确定型决决策问题题。 对对于这类类问题， 因为为没有一一个最好好的标准准（虽然然已经形形成了一一个公认认准则），而主主要取决

18、决与决策策者的经经验和态态度。这里主要要介绍三三种常用用的方法法，即：乐观法法，悲观观法和折折衷法。 aa.乐观观法乐观法又又称最大大最大准准则，大大中取大大准则。乐观法法的基本本思想对对客观情情况的发发生总是是抱乐观观态度，决策者者从最有有利的结结果去考考虑问题题。 这这种方法法的决策策原则是是从每一一个方案案找出最最有利的的效益值值，然后后在这些些最有利利的效益益值中，选取一一个效益益最大的的方案作作为决策策方案。b.悲观观法悲观法又又称最大大最小准准则，小小中取大大准则。悲观法法的思想想基础与与乐观法法相反， 即对对客观情情况综合合保持悲悲观态度度， 决决策者从从最不利利的角度度去考虑虑

19、问题。 这种种方法的的决策准准则是从从每一种种方案中中找出其其最小的的收益值值，然后后在这些些最小的的收益值值中，再再选取一一个收益益值最大大的方案案作为决决策方案案。c.折衷衷法折衷法又又称乐观观系数准准则，或或系数法法。此方方法为乐乐观准则则和悲观观准则之之间的折折衷。决决策对未未来发生生的情况况， 既既不乐观观也悲观观， 而而且，决决策者根根据以往往经验，确定一一个乐观观系数，来计计算方案案的效益益值。的取值值在0 和 11 之间间，即001；相相应的， 悲观观系数就就是1。 决决策中，以方案案中最为为乐观的的效益值值乘以乐乐观系数数，以最最悲观的的效益值值乘以悲悲观系数数1， 两两项相

20、加加，便得得到该方方案的效效益值。折中法的的两个极极端分别别是乐观观法和悲悲观法，当=1 时， 即乐观观法，而而=0 时，即即是悲观观法。风险情况况下的决决策如果决策策者不仅仅知道所所面临的的一些自自然状态态，以及及将采用用的一些些行动方方案在各各个不同同的自然然状态下下所得的的响应的的收益值值 ，而而且，还还知道这这些自然然状态的的概率分分布，但但由于未未来自然然状态不不为决策策者所肯肯定， 仅能依依据从以以往经验验或历史史资料中中了解的的概率做做出决策策。无论论做何选选择都可可能不如如人意，要承担担一定风风险，故故称为风风险决策策。这里主要要介绍风风险决策策中常用用的最大大可能准准则和期期

21、望准则则。( 1 )最大大可能准准则由概率知知识可知知， 一一个事件件其概率率越大， 其发发生的可可能性就就越大， 在风风险决策策中选择择一个概概率最大大的自然然状态进进行决策策， 置置其他自自然状态态于不顾顾， 这这就叫做做最大可可能准则则。利用用这个准准则，实实际上把把风险型型决策问问题变成成确定型型决策问问题。此决策应应用较广广， 但但当在一一组自然然状态中中， 它它们发生生的概率率相差不不大，则则不宜采采用此准准则。 ( 22 )期望望值准则则期望值准准则就是是把每个个方案在在各种自自然状态态下的收收益值看看成离散散型的随随机变量量， 我我们求出出每个方方案的收收益值的的数学期期望，加

22、加以比较较，选取取一个收收益值的的数学期期望最大大的行动动方案为为最优方方案。线性规划划方法 我们所所采取的的这种方方法是一一种运筹筹学方法法。它是是现代科科学管理理的重要要手段之之一，也也是帮助助管理者者作出高高效决策策的一种种有效方方法。诸诸如：合合理利用用线材问问题；配配料问题题；投资资决策问问题；产产品生产产计划；劳动力力安排；运输问问题。这这些都是是使决策策者在一一定限制制条件下下取得最最大利益益。以上上的几类类问题我我们正是是借助线线性规划划理论在在软件中中一一实实现了。软件中中采用了了最500个变量量，最多多50个个约束的的线性规规划方法法，从等等式约束束到不等等式约束束都能解解

23、决。比比作图法法，大MM法，单单纯形法法更简便便易用。下面我们们将举例例说明之之：水星糖果果公司（Merrcurry CCanddy CComppanyy）有两两家生产产工厂，位于新新英格兰兰的（11）和海海湾地区区的（22）。三三个仓库库位于东东海岸（1），中西部部（2）和西海海岸（33）三个个地区，从两家家工厂向向三个仓仓库运输输产品的的单位成成本如表表示：每每个地区区仓库对对产品的的需求在在最下一一行，每每个工厂厂可提供供的产品品列在最最右边一一列，厂厂商希望望使运费费最低。东海岸（1）中西部（2）西海岸（3）供给工厂新英格兰兰的（11）20美元元35美元元65美元元20000海湾地区区

24、的（22）25美元元15美元元50美元元25000需求200001500010000我们将之之归结为为一个线线性规划划问题来来处理。 MMinff=200 x1+35xx2+665x33+255x4+15xx5+550 x66 ss.t x11+x4420000 x2+x515000 x3+x610000 x1+x2+x320000 x4+x5+x625000利用软件件中的线线性规划划诊治方方法的要要求输入入，即可可得出最最优的运运输问题题的方案案。所得得答案确确实是最最优解。（见附附录一图图（1） 线性规规划方法法的实现现是基于于单纯形形法得到到的，详详细的算算法可参参见代码码段中的的lp(

25、)程序序段（见见附录二二）。 软件的基基本情况况就是这这样。三、 检检测与举举例在检测过过程中，我们列列举了杜杜邦财务务分析的的例子，以及上上一部分分中水星星糖果公公司（Merrcurry CCanddy CComppanyy）的例子子以及管理运运筹学中的线线性规划划的实例例。结果果都令人人非常满满意。为了更好好的检测测软件的的性能，这里我我们对一一个具体体的案例例进行分分析说明明。在吉林市市水泥管管厂主管管会计师师的帮助助下，我我们对该该厂19999年年和20000年年的财务务情况进进行了杜杜邦财务务分析。具体情情况如下下： 从该企企业20000年年的“资产负负债表”和“利润及及利润分分配表

26、”中可以以找到该该企业119999年和220000年的部部分情况况。 该企业业19999年的的销售收收入为33,3622,4322.75元元，总成成本为33,1339,5582.97元元，税后后净利润润为2222,8849.78元元，流动动资产为为47,2655,2664.339元，固定资资产为224,4443,2500.755 元，资产总总额为772,9956,5311.077元，所所有者权权益为111,9942,9111.677。在根根据上图图所示的的关系可可以算出出所需各各量的大大小，如如附录一一图（22）所示示： 我们同同样可知知该企业业20000年的的销售收收入为55,5776,99

27、54.04元元，总成成本为55,3993,5523.02元元，税后后净利润润为1883,4431.02元元，流动动资产为为53,9088,1335.002元，固定资资产为225,2210,2644.288 元，资产总总额为880,3372,9644.233元，所所有者权权益为111,8876,6222.055。在根根据上图图所示的的关系可可以算出出所需各各量的大大小，如如附录一一图（33）所示示： 从两图图中的数数据来分分析，总总体来说说，20000年年的财务务状况比比照19999年年有所下下降。220000年的资资产总额额和销售售收入相相对于119999年有所所上升，但税后后净利润润有所下下

28、降。并并因此造造成销售售净利润润的显著著下降。虽然销销售收入入和资产产总额都都有所上上升，但但销售收收入的增增长速度度大于资资产总额额的增长长速度，使得总总资产周周转率的的上升，这说明明该企业业的决策策者不满满足于现现状，开开拓进取取精神十十分可嘉嘉。但是是总资产产周转率率的增长长不及销销售净利利润下降降来的快快，所以以总资产产的报酬酬率比前前一年有有所下降降，并最最终导致致权益报报酬率这个个综合指指数的下下降。从从上述分分析可知知，虽然然该企业业的决策策者大胆胆创新，努力开开拓，但但所取得得的效果果并不尽尽人意，所以应应该考虑虑自身能能力的加加强。由于相关关知识的的缺乏和和经验的的不足，我们

29、的的软件中中还有这这样那样样的缺点点，譬如如界面不不够友好好，容错错能力有有待加强强等，这这同时也也暴露出出我们缺缺乏经验验的一面面。对于于这些缺缺点我们们会在后后期的完完善工作作中注意意改善。就此本项项目的工工作就基基本汇报报完毕了了，由于于个人的的课业负负担，我我们投入入到立项项上的精精力是有有限的，同时也也由于水水平有限限，这其其中的疏疏漏和错错误在所所难免，在这里里，我们们真诚地地恳请老老师、同同行们不不吝指教教。您提提出的批批评和意意见，不不仅会使使我们将将受益非非浅，更更是鞭策策我们继继续前进进的动力力。最后，衷衷心感谢谢焦宝聪聪老师，高蓉老老师在理理论上的的悉心指指导，工工作上的

30、的支持帮帮助！四、参考考书目韩伯棠编编著， 管理理运筹学学， 北北京：高高等教育育出版社社， 220000郭仲伟编编著， 风险险分析与与决策，北京：机械工工业出版版社，119877（加）钟钟彼德（Petter C. Belll）著著 韩伯棠棠等译， 管管理科学学（运筹筹学）战战略角度度的审视视，北京京：机械械工业出出版社，20000（美）詹詹姆斯RR.麦圭圭根(JJamees RR. MMcGuuigaan) R.查尔尔.莫耶(RR.Chharlles Moyyer) 弗雷雷德里克克H.BB.哈里里斯(FFredderiick H. DeBB.Haarriis)著著，李国国津等译译，管理理经济

31、学学应用、战略与与策略，北京：机械工工业出版版社，220000胡玉立 李东贤贤等编著著，市场场预测与与管理决决策，修修订本，北京：中国人人民大学学出版社社， 119977李宝三主主编，企企业资源源配置学习习管理经经济学，北京：企业管管理出版版社，119999佳文工作作室，VVISUUAL BASSIC 6.00编程实实例教程程，北京京：电子子工业出出版社，20001吴献东著著，企业业改造、再生对对策初探探，北京京：国防防工业出出版社，19995刘翼生 刘伊伟伟 王书书成主编编，中小小企业经经营战略略，北京京：中国国人民大大学出版版社，119999日末末松玄六六著，王王耀华，李桂香香，张钦钦先，

32、袁袁守启译译，中小小企业经经营战略略，北京京，中国国经济出出版社，19888附录一图（1）线性规规划的核核心程序序 l p（）：Publlic Subb lpp()Dim strrt, strrm AAs SStriingDim YDim ConntroolY = 0Conttroll = 30E = 0.0000001 Forr i = 11 Too Nnn A0(1, i) = -Pp * AA0(11, ii) Nexxt ii If mm = 11 Thhen GoTTo 1165 Forr i = 22 Too mmm + 1 A0(i, mm + NNn + 1) = A0(i,

33、Nn + 22) A0(i, Nn + 22) = 0 If i = 2 Theen GGoToo 1660 A0(i, Nn + ii - 1) = AA0(ii, NNn + 1) A0(i, Nn + 11) = 0160: Neext i165: R = 11For i = 2 To mm + 11L0(ii) = Nnn + i - 1 If A0(i, Nn + ii - 1) = 11 Thhen GoTTo 2210 L0(i) = mmm + Nnn + 1 Forr j = 11 Too Nnn + mm A0(mm + 22, jj) = A00(mmm + 2, j)

34、- AA0(ii, jj) Nexxt jj R = mmm + 2210: Neext i215: t = 11220: Foor ii = 2 TTo mmm + Nnn If A0(R, i) - AA0(RR, tt) E Theen GGoToo 2550 If A0(R, i) - AA0(RR, tt) -EE Thhen GoTTo 2250245: t = ii250: Neext i If A0(R, t) EE Thhen GoTTo 2290 Nexxt ii R = 1 GoTTo 2215290: Foor ii = 2 TTo mmm + 1 If L0(i) E

35、 TThenn GooTo 4255305: Neext i GoTTo 4445315: s = 11 Forr i = 22 Too mmm + 1 If A0(i, t) = AA0(ss, mmm + Nnn + 1) / AA0(ss, tt) TThenn GooTo 3500345: s = ii350: Neext i If s = 1 Theen GGoToo 4335 L0(s) = tt Y = A00(s, t) Forr i = 11 Too mmm + Nn + 11 A0(s, i) = AA0(ss, ii) / Y Nexxt ii Forr i = 11 T

36、oo mmm + 2 If i = s Theen GGoToo 4115 Y = A00(i, t) Forr j = 11 Too mmm + Nn + 11 A0(i, j) = AA0(ii, jj) - Y * AA0(ss, jj) Nexxt jj415: Neext i GoTTo 2215425: fformm14.Texxt1.texxt = 无无解 GoTTo 220000435: foorm114.TTextt1.ttextt = 无界界440: GooTo 20000445: Foor ii = 2 TTo mmm + 1 If L0(i) NNn TThenn Go

37、oTo 4655 s = L00(i) X0(s) = AA0(ii, mmm + Nnn + 1)465: Neext i Y = Ppp * A0(1, mm + NNn + 1) foorm114.TTextt1.ttextt = 最优优目标函函数值= + Sttr(YY)For i = 1 To Nn strrqq = sstrqqq + xx( + SStr(i) + )= + Sttr(XX0(ii) + Nexxt ii strrt = 最最优解为为: + sstrqqq Priintoor = Forr i = 11 Too Leen(sstrtt) Iff i Modd Co

38、ontrrol = 00 Annd (Lenn(sttrt) - i) = (Leen(sstrtt) MMod Conntrool) Theen sttrm = MMid(strrt, (i - CConttroll + 1), Coontrrol) PPrinntorr = Priintoor + Chhr(110) + CChr(13) + strrm sttrm = Ennd IIfNextt i Priintoor = Prrinttor + RRighht(sstrtt, (Lenn(sttrt) Mood CConttroll) forrm144.Teext22.teext =

39、PPrinntorr20000: Exiit SSubEnd Subb层次分析析法程序序 ：Privvatee Suub CCommmandd1_CClicck()Dim numm Ass InnteggerDim numm0, numm1, numm2 AAs DDoubblestrllinee = fly11 = 1On EErroor RResuume Nexxt Foor ii = 1 TTo LListt_n Foor jj = 1 TTo LListt_n Teext33(ii - 1) * LListt_n + jj).EEnabbledd = Truue Neext j Nee

40、xt i Forr i = 11 Too Liist_n Foor jj = i TTo LListt_n Iff i = jj Thhen Texxt3(i - 11) * Liist_n + j).teext = 1 Ellse nnum = 11 nnum11 = 1 nnum22 = 1 nnum = IInSttr(nnum, Teext33(ii - 1) * LListt_n + jj).ttextt, /) If numm 0 Theen nuum1 = VVal(Lefft(TTextt3(i - 1) * Lisst_nn + j).texxt, numm) nuum2 =

41、 VVal(Rigght(Texxt3(i - 11) * Liist_n + j).teext, Leen(TTextt3(i - 1) * Lisst_nn + j).texxt) - nnum) Teext33(ii - 1) * LListt_n + jj).ttextt = numm1 / nuum2 Teext33(jj - 1) * LListt_n + ii).ttextt = numm2 / nuum1 Elsse Teext33(jj - 1) * LListt_n + ii).ttextt = 1 / Vaal(TTextt3(i - 1) * Lisst_nn + j)

42、.texxt) Endd Iff Ennd IIf Nexxt jj Nexxt ii L = MssgBoox(您确定定以上的的数据吗吗？, 499, 提示)If LL 1 Theen Exiit SSubEnd IfCalll caacullatiion(Commbo11.LiistIIndeex + 1, Liist_n, Texxt3)If SSeleecteed(CCombbo1.LisstInndexx + 1) = CCombbo1.LisstInndexx + 1 TThenn h = MssgBoox(重新输输入新数数据吗？, 3) Sellectt Caase h Cass

43、e 11 GooTo op Casse 22 Exxit Subb Casse 77 EExitt Suub Endd SeelecctEnd Ifop: Sellectted(Commbo11.LiistIIndeex + 1) = Commbo11.LiistIIndeex + 1Calll chheckk结果说说明For i = 1 To Lisst_nn Nextt iIf ffly11 = 1 AAnd flyy2 = 1 Theen Commmannd1.Enaableed = Faalsee Commmannd2.Enaableed = Faalsee Foor ii = 1 T

44、To LListt_n ftooa(ii) = 0 Forr j = 11 Too Liist_m fttoa(i) = fftoaa(i) + AAss(j, i) * AAss(0, j) Nexxt jj strrlinne = sttrliine + SStr(ftooa(ii) + Neext i j = MssgBoox(各方案案对目标标的权数数为： + Chrr(100) + Chhr(113) + sstrllinee, 664, 结论论) Endd Iff Forr i = 11 Too Liist_n FFor j = 1 To Lisst_nn Texxt3(i - 11) * Liist_n + j).Viisibble = TTruee Texxt3(i - 11) * Liist_n + j).teext = IIf ii j OOr ii = j TThenn Texxt3(i - 11) * L