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

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

2、营管理理方面的的系统训训练也是是事实。这这和我国国即将加加入WTTO，企企业经营营管理要要求上层层次，与与世界接接轨的趋趋势相悖悖。所以以研究怎怎样提高高企业的的决策管管理水平平就愈显显重要了了。一、引言 中中小企业业经营诊诊断及最最优决策策这一一项目正正是着眼眼于中小小企业管管理决策策上的几几种常见见弊病，并并力求设设计一个个解决此此类问题题的适用用软件。 项项目开发发从最初初的立项项、调研研，中期期的学习习、讨论论，到后后期的制制作、检检测、分分析历时时近一年年。前期期的调研研我们从从一些企企业的具具体情况况入手，或或与之接接触，谋谋求合作作；或查查阅资料料，统计计数据。前前后历时时两个月

3、月，并为为以后的的工作打打好了良良好的基基础，软软件的制制作也能能有的放放矢。 中中期我们们认真组组织了学学习、讨讨论。针针对调查查中发现现的问题题以及一一些常见见弊病，我我们学习习了解决决它们的的各门知知识：线线性规划划，运筹筹学，风风险理论论，对策策论，最最优化理理论等等等。并加加强了计计算机软软件开发发能力的的学习和和训练。真真正为软软件的开开发成功功打造了了精良的的装备。于后期的制制作，我我们也进进行了多多轮的讨讨论。现现在的软软件也是是我们讨讨论多次次才逐渐渐定下来来的，然然而还不不完善，仍仍有一些些地方须须认真讨讨论。至至于测试试、 打打包各项项工作都都已陆续续完成。二、内容简简介

4、 我们的的软件在在设计、制制作过程程中紧紧紧围绕着着先进的的管理思思想与缜缜密的数数学理论论相结合合的宗旨旨。与同同类其他他的软件件相比，它它具有更更深厚的的理论内内涵，且且对于一一般的中中小企业业管理决决策问题题的解决决都有一一定的指指导和启启发作用用。下面我们将将软件的的具体内内容作一一个汇报报 软件的核核心部分分分成两两大块：企业评评价；企业诊诊治。 企业业评价包包括杜邦邦财务分分析法和和企业破破产危险险预测法法两个模模块； 企企业诊治治包括层层次分析析、风险险决策、线线性规划划三个模模块。杜邦财务分分析在这部分的的分析中中，主要要用了杜杜邦财务务分析的的方法。杜杜邦财务务分析方方法是在

5、在对企业业的偿债债能力，企企业资金金周转状状况，企企业获利利能力进进行综合合分析的的基础上上，按照照各比率率之间内内在的相相互制约约与影响响的关系系串联起起来，所所构成的的财务分分析体系系。具体体情况见见下图：从上图中我我们可以以看出，权权益报酬酬率是一一个综合合性最高高的具有有代表性性的财务务比率，他他是杜邦邦财务分分析体系系的核心心和枢纽纽。它反反映了企企业财务务管理的的重要目目标，即即所有者者财富最最大化。而而权益报报酬率的的形式及及水平取取决于资资产在各各个环节节的运作作效果。进行杜邦财财务分析析体系的的分析，便便于我们们发现企企业财务务的运作作是在哪哪个层次次的哪个个环节出出了问题题

6、。比如如，权益益报酬率率未达预预定目标标，可能能是总资资产报酬酬率偏低低或权益益乘数太太小或两两者兼而而有之；若总资资产报酬酬率不低低，权益益乘数太太小则反反映出企企业财务务结构过过于保守守，进而而反映出出经营者者的风险险及进取取精神不不足；若若总资产产报酬率率为负，权权益乘数数过大，必必会使权权益报酬酬率负向向放大。又又如，总总资产报报酬率偏偏低可能能是销售售净利润润率太低低，也可可能是资资产周转转速度太太慢，若若为总资资产周转转太慢，则则可能是是资产结结构不佳佳所致，等等等。究究竟是哪哪个层次次的哪个个环节出出了问题题，可以以对照杜杜邦财务务分析体体系层层层分析，找找出原因因并采取取相应措

7、措施予以以解决。破产危险预预测法对于一个经经济效益益不是很很好的企企业来讲讲，进行行破产分分析，及及早的对对企业所所面临的的危机有有一个比比较清楚楚的认识识是十分分必要的的。在诸诸多破产产分析方方法中，最最为简洁洁，又准准确有效效的就是是阿尔特特曼破产产判别函函数。阿尔特曼判判别函数数的表达达式为：ZZ=0.0122X1+0.0144X2+0.0333X3+0.0066X4+0.9999X5这里， XX1=流动动资本/总资本本 XX2=保留留利润/总资产产 XX3=利息息及扣除除税款前前纯利润润/总资资产 XX4=企业业持股份份额的市市场价值值/总负负债的帐帐簿价值值 XX5=销售额额/总资资

8、产 ZZ=综合合指数 X1是流动动资本和和总资产产相比所所得的比比率，是是企业的的纯流动动资产占占全部还还原资本本的比例例。流动动资本是是流动资资产和流流动负债债的差额额。这个个比率表表现了流流动率和和规模的的特征。一一旦营业业损失持持续下去去，流动动资产就就变小。在在流动性性比率中中，这个个比率最最为有效效。X2是表示示积累的的收益力力指标，从从前被当当作新东东西。比比较年轻轻的企业业只能表表示低保保留利润润（法定定预备金金加剩余余金）对对总资产产的比率率。因此此用这个个指标分分析，可可以断定定年轻企企业是不不利的。X3是利息息和没扣扣除税金金前的纯纯利润所所占总资资产的比比例，因因此他表表

9、示企业业真正的的生产效效率。当当总负债债超过用用资产收收益力评评估的资资产价值值引起不不能支付付的时候候，正是是企业破破产的时时候，所所以这个个比率也也是表示示破产的的重要指指标。X4 是企企业持股股份额的的市场价价值和总总负债帐帐簿价值值的比率率。企业业持股份份额的市市场价值值用普通通股和优优先股合合并计算算的股份份资本的的市场价价值来表表示，负负债是长长短期负负债合并并计算。这这个指标标表明，负负债超过过资产的的企业在在破产前前其资产产价值能能跌落到到什么地地步。用用这个比比率当破破产指标标，比纯纯资产对对总资产产的比率率当破产产指标更更好一些些，现在在对破产产比率的的研究，不不用总资资产

10、市场场价值的的概念是是一个特特点。X5是销售售额对总总资产的的比率，表表示总资资产的周周转率。但但在乘系系数的时时候，只只这个比比率用次次数，不不带 % 。这这个指标标是表示示企业销销售力和和竞争力力的重要要指标。 Z 是是最后得得到的综综合指数数，也是是判断企企业是否否面临破破产的最最主要的的参数。在在长期的的追踪预预测结果果和对结结果的统统计分析析基础上上，得出出了综合合指数ZZ 的临临界值是是2。当当Z小于22时，企企业面临临破产的的危机，Z值越小，这种破产危机越严峻；当Z大于2时，企业经营状况良好，Z值越大，企业的经营状况越良好。其中，1.81到2.67之间称为交叉地带或无知地带，Z值

11、在这一区间的企业应对自己的经营状况进行调整，理顺各方面的矛盾问题，早日跳出灰色地带（交叉地带），摆脱破产危机。 层次分析法法层次分析法法（Annalyytic Hieerarrchyy Prroceess， 简称AAHP）是是一种特特别适合合具有复复杂结构构的多目目标决策策分析技技术。它它的特点点是将决决策问题题的目标标,多种种层次因因素及方方案等的的分析，构构造出层层次结构构，结合合主观判判断信息息作出定定量分析析的方案案优序排排列，它它将决策策者的思思维过程程实现数数量化，模模型化，既既简化了了问题的的系统分分析计算算， 又又有助于于使决策策者保持持其思维维过程的的一致性性。具体体步骤简简

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

13、层等等等。最低层：表表示解决决问题的的对策或或措施。决策目标 决策目标准则 3准则 2准则 1准则 3准则 2准则 1子准则 1子准则 3子准则 2子准则 1子准则 3子准则 2方案 1方案 3方案 2方案 1方案 3方案 2（3）构造造判断矩矩阵建立层次结结构模型型后， 进行逐逐层逐项项的两两两比较， 即每一一层次各各个元素素， 针针对上一一层某元元素的相相互重要要性给出出判断评评分数值值，开方方成判断断矩阵。判判断矩阵阵是AHHP法的的关键一一步。假定A 层层中元素素aijj与下一一层次BB1，BB2.，BBn有联系系 比较较后得下下面形式式的判断断矩阵。a kB1 BB2 B33 Bnn

14、 B1b11 bb12 b133 b1nn B2b21 b222 b233 b2nn Bnbn1 bnn2 bnn3 bnnn其中bijj表示对对于上层层a k元素而而言，BBi对Bj的相对对重要性性， bbij的判判断评分分数值，通通常1，22，3，.9及其倒数， 其含义下表说明。评分值含 义义 1表示两因素素相比， 具有同同样重要要性3表示两因素素相比，一一个因素素比另一一个因素素稍微重重要5表示两因素素相比，一一个因素素比另一一个因素素明显重重要7表示两因素素相比，一一个因素素比另一一个因素素强烈重重要9表示两因素素相比，一一个因素素比另一一个因素素极端重重要2上述两相邻邻判断的的中值4

15、68倒数如果因素II与因素素J 比比较得判判断Biij，则则因素JJ 与因因素I比比较的判判断Bjji=11/Biij（I不等于于J）判断矩阵中中的具体体数值来来自资料料或专家家意见。 若只考虑虑只有一一层标准准层时Ak方案1方案2方案n方案1b11b12B1n方案2b21b22B2n方案nbn1bn2Bnn （4）求求各因素素权重的的过程 首首先， 用两两两比较矩矩阵来求求出各方方案在aa1,aa k， 这这k个方面面的权重重，各方方案在某某一方面面的权重重组成的的列向量量称作在在a i这个方方面的特特征向量量（i=1，22.k） 第第一步，先先求出两两两比较较矩阵每每一列的的总和； 第第二

16、步，把把两两比比较矩阵阵的每一一元素除除以其系系相应列列的总和和， 所所得商所所组成的的新矩阵阵称之为为标准两两两比较较矩阵； 第第三步，计计算标准准两两矩矩阵的每每一行的的平均值值，这些些平均值值就是各各方案在在ai方面的的权重。 另另外， 还应求求得每个个标准aai在总的的决策方方案里的的相对重重要的程程度，即即要取得得每个标标准相对对的权重重，即每每个标准准的特征征向量。方方法同上上。 （5）利利用权数数或特征征向量求求出各方方案的方方案优劣劣次序设我们们在上面面已经求求得在kk 个方方面的kk个特征征向量为为A1，AA2 .Ak Ai=(a11i a2ii aani )* aaji 表

17、示第第j个方案案在第ii个方面面的权重重 设各各个标准准（方面面）在总总目标中中所占的的重要性性（权数数）的向向量为MM MM=(mm1 mm2 mmk)* mmi为第第i个方面面的权重重所以(A11，A22 .Ak)是一个个nk阶的矩矩阵，MM是一个个k1阶的矩矩阵。令令 N=(n1 n2 nk)*=AM是是一个nn1阶的的矩阵，即即一个nn维列向向量其中中ni表示示第i个方面面在总目目标中的的总得分分。 通通过比较较所知，NN中最大大的数对对应方案案便是最最优方案案， 即即最后的的决策方方案。风险决策不确定情况况下的决决策有一类决策策问题，决决策者虽虽然知道道未来所所能发生生那些自自然状态

18、态， 但但却无法法预先估估计或预预测各种种可能状状态发生生的概率率， 这这就是未未确定型型决策问问题。 对于这这类问题题， 因因为没有有一个最最好的标标准（虽虽然已经经形成了了一个公公认准则则），而而主要取取决与决决策者的的经验和和态度。这里主要介介绍三种种常用的的方法，即即：乐观观法，悲悲观法和和折衷法法。 a.乐观法法乐观法又称称最大最最大准则则，大中中取大准准则。乐乐观法的的基本思思想对客客观情况况的发生生总是抱抱乐观态态度，决决策者从从最有利利的结果果去考虑虑问题。 这种方方法的决决策原则则是从每每一个方方案找出出最有利利的效益益值，然然后在这这些最有有利的效效益值中中，选取取一个效效

19、益最大大的方案案作为决决策方案案。b.悲观法法悲观法又称称最大最最小准则则，小中中取大准准则。悲悲观法的的思想基基础与乐乐观法相相反， 即对客客观情况况综合保保持悲观观态度， 决策者者从最不不利的角角度去考考虑问题题。 这这种方法法的决策策准则是是从每一一种方案案中找出出其最小小的收益益值，然然后在这这些最小小的收益益值中，再再选取一一个收益益值最大大的方案案作为决决策方案案。c.折衷法法折衷法又称称乐观系系数准则则，或系系数法。此此方法为为乐观准准则和悲悲观准则则之间的的折衷。决决策对未未来发生生的情况况， 既既不乐观观也悲观观， 而而且，决决策者根根据以往往经验，确确定一个个乐观系系数，来

20、计计算方案案的效益益值。的取值值在0 和 11 之间间，即001；相相应的， 悲观系系数就是是1。 决决策中，以以方案中中最为乐乐观的效效益值乘乘以乐观观系数，以最最悲观的的效益值值乘以悲悲观系数数1， 两两项相加加，便得得到该方方案的效效益值。折中法的两两个极端端分别是是乐观法法和悲观观法，当当=1 时， 即乐观观法，而而=0 时，即即是悲观观法。风险情况下下的决策策如果决策者者不仅知知道所面面临的一一些自然然状态，以以及将采采用的一一些行动动方案在在各个不不同的自自然状态态下所得得的响应应的收益益值 ，而而且，还还知道这这些自然然状态的的概率分分布，但但由于未未来自然然状态不不为决策策者所

21、肯肯定， 仅能依依据从以以往经验验或历史史资料中中了解的的概率做做出决策策。无论论做何选选择都可可能不如如人意，要要承担一一定风险险，故称称为风险险决策。这里主要介介绍风险险决策中中常用的的最大可可能准则则和期望望准则。( 1 )最大可可能准则则由概率知识识可知， 一个事事件其概概率越大大， 其其发生的的可能性性就越大大， 在在风险决决策中选选择一个个概率最最大的自自然状态态进行决决策， 置其他他自然状状态于不不顾， 这就叫叫做最大大可能准准则。利利用这个个准则，实实际上把把风险型型决策问问题变成成确定型型决策问问题。此决策应用用较广， 但当在在一组自自然状态态中， 它们发发生的概概率相差差不

22、大，则则不宜采采用此准准则。 ( 2 )期望望值准则则期望值准则则就是把把每个方方案在各各种自然然状态下下的收益益值看成成离散型型的随机机变量， 我们求求出每个个方案的的收益值值的数学学期望，加加以比较较，选取取一个收收益值的的数学期期望最大大的行动动方案为为最优方方案。线性规划方方法 我们所采采取的这这种方法法是一种种运筹学学方法。它它是现代代科学管管理的重重要手段段之一，也也是帮助助管理者者作出高高效决策策的一种种有效方方法。诸诸如：合合理利用用线材问问题；配配料问题题；投资资决策问问题；产产品生产产计划；劳动力力安排；运输问问题。这这些都是是使决策策者在一一定限制制条件下下取得最最大利益

23、益。以上上的几类类问题我我们正是是借助线线性规划划理论在在软件中中一一实实现了。软软件中采采用了最最50个个变量，最最多500个约束束的线性性规划方方法，从从等式约约束到不不等式约约束都能能解决。比比作图法法，大MM法，单单纯形法法更简便便易用。下面我们将将举例说说明之：水星糖果公公司（MMerccuryy Caandyy Coompaany）有有两家生生产工厂厂，位于于新英格格兰的（11）和海海湾地区区的（22）。三三个仓库库位于东东海岸（11），中中西部（22）和西西海岸（33）三个个地区，从从两家工工厂向三三个仓库库运输产产品的单单位成本本如表示示：每个个地区仓仓库对产产品的需需求在最最

24、下一行行，每个个工厂可可提供的的产品列列在最右右边一列列，厂商商希望使使运费最最低。东海岸（11）中西部（22）西海岸（33）供给工厂新英格兰的的（1）20美元35美元65美元2000海湾地区的的（2）25美元15美元50美元2500需求200015001000我们将之归归结为一一个线性性规划问问题来处处理。 Miinf=20 xx1+335x22+655x3+25xx4+115x55+500 x6 s.t x1+x420000 xx2+xx515000 xx3+xx610000 xx1+xx2+xx320000 xx4+xx5+xx625000利用软件中中的线性性规划诊诊治方法法的要求求输入

25、，即即可得出出最优的的运输问问题的方方案。所所得答案案确实是是最优解解。（见见附录一一图（11） 线线性规划划方法的的实现是是基于单单纯形法法得到的的，详细细的算法法可参见见代码段段中的llp()程序段段（见附附录二）。 软件的基本本情况就就是这样样。三、 检测测与举例例在检测过程程中，我我们列举举了杜邦邦财务分分析的例例子，以以及上一一部分中中水星糖糖果公司司（Merrcurry CCanddy CComppanyy）的例子子以及管管理运筹筹学中中的线性性规划的的实例。结结果都令令人非常常满意。为了更好的的检测软件件的性能能，这里里我们对对一个具具体的案案例进行行分析说说明。在吉林市水水泥管

26、厂厂主管会会计师的的帮助下下，我们们对该厂厂19999年和和20000年的的财务情情况进行行了杜邦邦财务分分析。具具体情况况如下： 从从该企业业20000年的的“资产负负债表”和“利润及及利润分分配表”中可以以找到该该企业119999年和220000年的部部分情况况。 该该企业119999年的销销售收入入为3,3622,4322.75元元，总成成本为33,1339,5582.97元元，税后后净利润润为2222,8849.78元元，流动动资产为为47,2655,2664.339元，固固定资产产为244,4443,2250.75 元，资资产总额额为722,9556,5531.07元元，所有有者权益

27、益为111,9442,9911.67。在在根据上上图所示示的关系系可以算算出所需需各量的的大小，如如附录一一图（22）所示示： 我我们同样样可知该该企业220000年的销销售收入入为5,5766,9554.004元，总总成本为为5,3393,5233.022元，税税后净利利润为1183,4311.022元，流流动资产产为533,9008,1135.02元元，固定定资产为为25,2100,2664.228 元元，资产产总额为为80,3722,9664.223元，所所有者权权益为111,8876,6222.055。在根根据上图图所示的的关系可可以算出出所需各各量的大大小，如如附录一一图（33）所示

28、示： 从从两图中中的数据据来分析析，总体体来说，220000年的财财务状况况比照119999年有所所下降。220000年的资资产总额额和销售售收入相相对于119999年有所所上升，但但税后净净利润有有所下降降。并因因此造成成销售净净利润的的显著下下降。虽虽然销售售收入和和资产总总额都有有所上升升，但销销售收入入的增长长速度大大于资产产总额的的增长速速度，使使得总资资产周转转率的上上升，这这说明该该企业的的决策者者不满足足于现状状，开拓拓进取精精神十分分可嘉。但但是总资资产周转转率的增增长不及及销售净净利润下下降来的的快，所所以总资资产的报报酬率比比前一年年有所下下降，并并最终导导致权益益报酬率

29、率这个个综合指指数的下下降。从从上述分分析可知知，虽然然该企业业的决策策者大胆胆创新，努努力开拓拓，但所所取得的的效果并并不尽人人意，所所以应该该考虑自自身能力力的加强强。由于相关知知识的缺缺乏和经经验的不不足，我我们的软软件中还还有这样样那样的的缺点，譬譬如界面面不够友友好，容容错能力力有待加加强等，这这同时也也暴露出出我们缺缺乏经验验的一面面。对于于这些缺缺点我们们会在后后期的完完善工作作中注意意改善。就此本项目目的工作作就基本本汇报完完毕了，由由于个人人的课业业负担，我我们投入入到立项项上的精精力是有有限的，同同时也由由于水平平有限，这这其中的的疏漏和和错误在在所难免免，在这这里，我我们

30、真诚诚地恳请请老师、同同行们不不吝指教教。您提提出的批批评和意意见，不不仅会使使我们将将受益非非浅，更更是鞭策策我们继继续前进进的动力力。最后，衷心心感谢焦焦宝聪老老师，高高蓉老师师在理论论上的悉悉心指导导，工作作上的支支持帮助助！四、参考书书目韩伯棠编著著， 管理运运筹学， 北京：高等教教育出版版社， 20000郭仲伟编著著， 风险分分析与决决策，北北京：机机械工业业出版社社，19987（加）钟彼彼德（PPeteer CC. BBelll）著 韩伯棠棠等译， 管理理科学（运运筹学）战战略角度度的审视视，北京京：机械械工业出出版社，220000（美）詹姆姆斯R.麦圭根根(Jaamess R.

31、MccGuiigann) R.查尔尔.莫耶(RR.Chharlles Moyyer) 弗雷雷德里克克H.BB.哈里里斯(FFredderiick H. DeBB.Haarriis)著著，李国国津等译译，管理理经济学学应用、战战略与策策略，北北京：机机械工业业出版社社，20000胡玉立 李李东贤等等编著，市市场预测测与管理理决策，修修订本，北北京：中中国人民民大学出出版社， 19997李宝三主编编，企业业资源配配置学习管管理经济济学，北北京：企企业管理理出版社社，19999佳文工作室室，VIISUAAL BBASIIC 66.0编编程实例例教程，北北京：电电子工业业出版社社，20001吴献东著，

32、企企业改造造、再生生对策初初探，北北京：国国防工业业出版社社，19995刘翼生 刘刘伊伟 王书成成主编，中中小企业业经营战战略，北北京：中中国人民民大学出出版社，119999日末松松玄六著著，王耀耀华，李李桂香，张张钦先，袁袁守启译译，中小小企业经经营战略略，北京京，中国国经济出出版社，119888附录一图（1）线性规划划的核心心程序 l pp（）：Publiic SSub lp()Dim sstrtt, sstrmm Ass SttrinngDim YYDim CConttrollY = 00Contrrol = 330E = 00.0000011 For i = 1 To Nn A0(11

33、, ii) = -PPp * A00(1, i) Nextt i If mmm = 1 Theen GGoToo 1665 For i = 2 To mm + 11 A0(ii, mmm + Nnn + 1) = AA0(ii, NNn + 2) A0(ii, NNn + 2) = 0 If ii = 2 TThenn GooTo 1600 A0(ii, NNn + i - 11) = A00(i, Nnn + 1) A0(ii, NNn + 1) = 0160: Nexxt ii165: R = 1For ii = 2 TTo mmm + 1L0(i) = Nn + ii - 1 If AA

34、0(ii, NNn + i - 11) = 1 Theen GGoToo 2110 L0(ii) = mmm + Nn + 11 For j = 1 To Nn + mmm A0(mmm + 2, j) = A0(mm + 22, jj) - A00(i, j) Nextt j R = mm + 22210: Nexxt ii215: t = 1220: Forr i = 22 Too mmm + Nn If AA0(RR, ii) - A00(R, t) E TThenn GooTo 2500 If AA0(RR, ii) - A00(R, t) -E Theen GGoToo 255024

35、5: t = i250: Nexxt ii If AA0(RR, tt) E Theen GGoToo 2990 Nextt i R = 1 GoToo 2115290: Forr i = 22 Too mmm + 1 If LL0(ii) EE Thhen GoTTo 4425305: Nexxt ii GoToo 4445315: s = 1 For i = 2 To mm + 11 If AA0(ii, tt) = A00(s, mmm + Nn + 11) / A00(s, t) Thhen GoTTo 3350345: s = i350: Nexxt ii If ss = 1 TTh

36、enn GooTo 4355 L0(ss) = t Y = A0(s, t) For i = 1 To mm + NNn + 1 A0(ss, ii) = A00(s, i) / Y Nextt i For i = 1 To mm + 22 If ii = s TThenn GooTo 4155 Y = A0(i, t) For j = 1 To mm + NNn + 1 A0(ii, jj) = A00(i, j) - Y * A00(s, j) Nextt j415: Nexxt ii GoToo 2115425: foorm114.TTextt1.ttextt = 无解解 GoToo 2

37、0000435: forrm144.Teext11.teext = 无界440: GoTTo 220000445: Forr i = 22 Too mmm + 1 If LL0(ii) Nnn Thhen GoTTo 4465 s = L0(i) X0(ss) = A00(i, mmm + Nn + 11)465: Nexxt ii Y = Pp * AA0(11, mmm + Nnn + 1) forrm144.Teext11.teext = 最优目目标函数数值= + Strr(Y)For ii = 1 TTo NNn strqqq = sttrqqq + x( + Sttr(ii) + )

38、= + Strr(X00(i) + Nextt i strtt = 最优优解为: + sttrqqq Prinntorr = For i = 1 To Lenn(sttrt) If i MMod Conntrool = 0 Andd (LLen(strrt) - ii) = (Lenn(sttrt) Mood CConttroll) TThenn strrm = Miid(sstrtt, (i - Coontrrol + 11), Conntrool) Prrinttor = PPrinntorr + Chrr(100) + Chhr(113) + sstrmm strrm = Endd If

39、fNext i PPrinntorr = Priintoor + Riightt(sttrt, (LLen(strrt) Modd Coontrrol) formm14.Texxt2.texxt = Prrinttor2000: EExitt SuubEnd SSub层次分析法法程序 ：Privaate Subb Coommaand11_Cllickk()Dim nnum As InttegeerDim nnum00, nnum11, nnum22 Ass Dooubllestrliine = fly1 = 11On Errrorr Reesumme NNextt Forr i = 11 To

40、o Liist_n Forr j = 11 Too Liist_n Texxt3(i - 11) * Liist_n + j).Ennablled = TTruee Nexxt jj Nexxt ii For i = 1 To Lisst_nn Forr j = ii Too Liist_n If i = j Theen TTextt3(i - 1) * Lisst_nn + j).texxt = 1 Elsse nuum = 1 nuum1 = 11 nuum2 = 11 nuum = InnStrr(nuum, Texxt3(i - 11) * Liist_n + j).teext, /)

41、 IIf nnum 0 TThenn numm1 = Vaal(LLeftt(Teext33(ii - 1) * LListt_n + jj).ttextt, nnum) numm2 = Vaal(RRighht(TTextt3(i - 1) * Lisst_nn + j).texxt, Lenn(Teext33(ii - 1) * LListt_n + jj).ttextt) - nuum) Texxt3(i - 11) * Liist_n + j).teext = nnum11 / numm2 Texxt3(j - 11) * Liist_n + i).teext = nnum22 / n

42、umm1 EElsee Texxt3(j - 11) * Liist_n + i).teext = 11 / Vall(Teext33(ii - 1) * LListt_n + jj).ttextt) EEnd If Endd Iff Nextt j Nextt i L = MsggBoxx(您您确定以以上的数数据吗？, 49, 提提示)If L 1 TThenn Exitt SuubEnd IIfCall cacculaatioon(CCombbo1.LisstInndexx + 1, Lisst_nn, TTextt3)If Seelecctedd(Coomboo1.LListtIndde

43、x + 11) = Coomboo1.LListtInddex + 11 Thhen h = MsggBoxx(重重新输入入新数据据吗？, 33) Seleect Casse hh Casee 1 GoTTo oop Casee 2 Exiit SSub Casee 7 Exxit Subb End SellecttEnd IIfop: SSeleecteed(CCombbo1.LisstInndexx + 1) = CCombbo1.LisstInndexx + 1Call cheeck结果说明明For ii = 1 TTo LListt_n Next iIf flly1 = 11 Annd

44、 ffly22 = 1 TThenn Commmandd1.EEnabbledd = Fallse Commmandd2.EEnabbledd = Fallse Forr i = 11 Too Liist_n fftoaa(i) = 0 FFor j = 1 To Lisst_mm ftooa(ii) = fttoa(i) + AAAs(j, i) * AAAs(0, j) NNextt j sstrllinee = strrlinne + Sttr(fftoaa(i) + Nexxt ii j = MsggBoxx(各各方案对对目标的的权数为为： + CChr(10) + Chrr(133) + sttrliine, 644, 结论) End If For i = 1 To Lisst_nn Foor jj = 1 TTo LListt_n TTextt3(i - 1) * Lisst_nn + j).Vissiblle = Trrue TTextt3(i - 1) * Lisst_nn + j).texxt = Iff i jj Orr i = jj Thhen TTextt3(