資源描述：
《層次分析法的源程序》由會(huì)員上傳分享，免費(fèi)在線(xiàn)閱讀，更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫(kù)。
1、層次分析法的源程序1、算法PrivateSubCommand1_Click()DimnumAsIntegerDimnum0,num1,num2AsDoublestrline=""fly1=1OnErrorResumeNextFori=1ToList_nForj=1ToList_nText3((i-1)*List_n+j).Enabled=TrueNextjNextiFori=1ToList_nForj=iToList_nIfi=jThenText3((i-1)*List_n+j).text="1"Elsenum=
2、1num1=1num2=1num=InStr(num,Text3((i-1)*List_n+j).text,"/")Ifnum<>0Thennum1=Val(Left(Text3((i-1)*List_n+j).text,num))num2=Val(Right(Text3((i-1)*List_n+j).text,Len(Text3((i-1)*List_n+j).text)-num))Text3((i-1)*List_n+j).text=num1/num2Text3((j-1)*List_n+i).text=n
3、um2/num1ElseText3((j-1)*List_n+i).text=1/Val(Text3((i-1)*List_n+j).text)EndIfEndIfNextjNextiL=MsgBox("您確定以上的數(shù)據(jù)嗎？",49,"提示")IfL<>1ThenExitSubEndIfCallcaculation(Combo1.ListIndex+1,List_n,Text3)IfSelected(Combo1.ListIndex+1)=Combo1.ListIndex+1Thenh=MsgBox("重新輸入新
4、數(shù)據(jù)嗎？",3)SelectCasehCase1GoToopCase2ExitSubCase7ExitSubEndSelectEndIfop:Selected(Combo1.ListIndex+1)=Combo1.ListIndex+1Callcheck’結(jié)果說(shuō)明Fori=1ToList_nNextiIffly1=1Andfly2=1ThenCommand1.Enabled=FalseCommand2.Enabled=FalseFori=1ToList_nftoa(i)=0Forj=1ToList_mftoa(i
5、)=ftoa(i)+AAs(j,i)*AAs(0,j)Nextjstrline=strline+Str(ftoa(i))+""Nextij=MsgBox("各方案對(duì)目標(biāo)的權(quán)數(shù)為："+Chr(10)+Chr(13)+strline,64,"結(jié)論")EndIfFori=1ToList_nForj=1ToList_nText3((i-1)*List_n+j).Visible=TrueText3((i-1)*List_n+j).text=""Ifi>jOri=jThenText3((i-1)*List_n+j).Enab
6、led=FalseText3((i-1)*List_n+j).BackColor=&H868754EndIfNextjNextiEndSub旅游業(yè)在中國(guó)發(fā)展迅猛，旅游學(xué)、旅游教育的發(fā)展卻相對(duì)滯后，文章用模糊數(shù)學(xué)中的綜合評(píng)判法為旅游學(xué)提供一種評(píng)價(jià)模式，使其不僅更具科學(xué)性，而且更具操作性，從而使旅游業(yè)的發(fā)展更具合理性?！ ￡P(guān)鍵詞 旅游 模糊數(shù)學(xué) 集合 綜合評(píng)價(jià) 現(xiàn)實(shí)生活中充滿(mǎn)了模糊事物、模糊概念，比如暖、胖、亮、老等。我們的想法是怎樣利用模糊數(shù)學(xué)中的模糊集合概念來(lái)描述諸如此類(lèi)的模糊事物?？梢栽O(shè)定若集合用大寫(xiě)字母A、
7、B……來(lái)表示，則A、B……表示模糊集合，用?滋（ｘ）表示元素X屬于模糊集合A的程度。?滋可在［0,1］內(nèi)連續(xù)取值，所以能合適的表示元素，X屬于某一個(gè)模糊集合的種種曖昧狀態(tài)。例如，導(dǎo)游小姐為了使57歲的女士不至于為年齡大而傷心，告訴她其實(shí)女士的年齡只有66%屬“老年人”，而基本上可以說(shuō)還不是老年人，因?yàn)椋骸 ?滋老年人（Ｘ）＝≈６６％ 也就是說(shuō)這位女士屬于老年人集合的資格只有0.66，按這個(gè)公式就連70歲的人也只有94%（而不是100%）的資格屬于老年人，女士有什么理由認(rèn)為自己老的不能活下去呢？！ 成功的用模糊
8、數(shù)學(xué)公式勸導(dǎo)游客當(dāng)然不是導(dǎo)游小姐的獨(dú)創(chuàng)，只是這位導(dǎo)游小姐能自如的把模糊數(shù)學(xué)運(yùn)用到自己的工作中罷了。模糊數(shù)學(xué)自1965年問(wèn)世以來(lái)，發(fā)展的異常迅速，目前世界上已有多種專(zhuān)著、論文集以及雜志。從這些出版物中可以看到，國(guó)內(nèi)外許多學(xué)者在這一重要和迅速發(fā)展的領(lǐng)域中作出了有價(jià)值的貢獻(xiàn)。今天我們也試圖在旅游行業(yè)中發(fā)現(xiàn)模糊數(shù)學(xué)的痕跡。模糊數(shù)學(xué)中的模糊綜合評(píng)判法，應(yīng)該可以在旅游業(yè)中找到用武之地
