步進(jìn)式加熱爐程序設(shè)計及三維立體制圖

PAGE第PAGEIV頁遼寧科技大學(xué)本科生畢業(yè)論文步進(jìn)式加熱爐程序設(shè)計摘要隨著我國鋼鐵行業(yè)的迅猛發(fā)展，鋼產(chǎn)量的逐年增加，軋鋼工藝的不斷提高，推鋼式加熱爐已經(jīng)難以滿足要求，而步進(jìn)式加熱爐在生產(chǎn)實(shí)踐中證明了其良好的使用效果。因此，在國內(nèi)外步進(jìn)式加熱爐的使用得到很快的推廣。本設(shè)計主要利用VisualStudio2010編程軟件對步進(jìn)式加熱爐進(jìn)行設(shè)計計算，計算內(nèi)容包括燃料燃燒計算，爐膛熱交換計算，金屬加熱時間計算，爐子的主要尺寸計算，爐子熱平衡計算，換熱器計算，排煙系統(tǒng)和供風(fēng)系統(tǒng)的流體力學(xué)計算，爐底水管的校核共九部分組成。借助于VB編程技術(shù)開發(fā)出加熱爐設(shè)計計算軟件，不僅可以縮短設(shè)計周期，還極大地提高工作效率和設(shè)計質(zhì)量，同時，設(shè)計中還運(yùn)用三維建模軟件SolidWorks繪制蓄熱燒嘴立體圖。較之AutoCAD，SolidWorks三維建模更具有直觀性，更易體現(xiàn)設(shè)計者的設(shè)計意圖。最后以專題的形式對加熱爐的蓄熱燃燒技術(shù)作深入的研究。關(guān)鍵詞：步進(jìn)式加熱爐；VisualStudio2010；計算軟件；蓄熱式燃燒

WalkingBeamHeatingFurnaceProgramDesigningAbstractWiththerapiddevelopmentofChina'ssteelindustry,theproductionofsteelhasbeenincreasingannually,androllingtechnologycontinuestoimprove,Pushgenerallythesteeltypeheatingfurnacehasbeendifficulttomeettheincreasinglyrequest,butwalking-beamreheatingfurnaceisalreadyprovedtohavegooduseofeffectsintheproductionpractice.Therefore,itisspreadfastintheproductionoftheheatingfurnaceathomeandabroad.ThisdesignmainlyuseVisualStudio2010programmingsoftwaretodesigncalculation,calculationincludingcalculationoffuel-borne,furnaceheatexchangecalculations,calculationofmetalheatingtime,themainfurnacesizecalculation,thebalanceoffurnaceheatcalculation,calculationofheatexchanger,exhaustsystemandairsystemforcomputationalfluiddynamics,waterpipecheckunderthefurnacenine.AndsoonVBprogrammingtechnologydevelopedbymeansoffurnacedesignsoftwarecannotonlyshortenthedesigncycle,butalsogreatlyimprovetheefficiencyanddesignquality,Atthesametime,inthisdesignSolidWorks,thethree-dimensionalmodelingsoftware,isalsousedtodrawmapsforheatingfurnace.ComparedwithAutoCAD,SolidWorksthree-dimensionalmodelingismuchmoreintuitive,andmucheasiertoreflectthedesigner'sintent.FinallyRegenerativeCombustionTechniqueasaspecialforin-depthstudy.Keywords：WalkingBeamHeatingFurnace；VisualStudio2010；Softwareforcalculation；RegenerativeCombustion

目錄摘要 IAbstract II目錄 III第一章緒論 11.1加熱爐的基本構(gòu)成 11.2步進(jìn)式加熱爐的特點(diǎn) 11.3步進(jìn)式加熱爐的發(fā)展趨勢 21.4設(shè)計的主要內(nèi)容 2第二章基于VB的步進(jìn)式加熱爐設(shè)計計算軟件 32.1軟件開發(fā)背景 32.2加熱爐計算軟件設(shè)計過程的實(shí)現(xiàn) 32.2.1加熱爐設(shè)計基本參數(shù)輸入 32.2.2燃料燃燒設(shè)計計算 42.2.3爐膛熱交換計算 42.2.4金屬加熱的設(shè)計計算 42.2.5爐子熱平衡計算 52.2.6換熱器計算 52.2.7排煙系統(tǒng)阻力損失計算 52.2.8送風(fēng)系統(tǒng)及爐底水管校核計算 62.2.9爐底水管強(qiáng)度校核 62.3加熱爐設(shè)計計算軟件的運(yùn)行 62.3.1程序登錄 62.3.2加熱爐設(shè)計基本參數(shù)輸入 72.3.3燃料燃燒計算操作 82.3.4爐膛熱交換計算操作 92.3.5金屬加熱時間計算操作 122.3.6爐子熱平衡計算操作 132.3.7換熱器計算操作 132.3.8排煙系統(tǒng)計算操作 152.3.9送風(fēng)系統(tǒng)計算操作 162.3.10爐底水管校核計算操作 16結(jié)論 18致謝 24附錄A 25參考文獻(xiàn) 45第三章專題蓄熱燃燒技術(shù)及蓄熱燒嘴三維制圖 463.1引言 463.1.1蓄熱燃燒技術(shù)歷史發(fā)展概況 463.3.2我國蓄熱燃燒技術(shù)展望 463.2蓄熱燃燒技術(shù) 473.2.1蓄熱燃燒技術(shù)原理 473.2.2蓄熱燃燒的工作過程 473.2.3對蓄熱體的要求和使用條件 473.2.4蓄熱燃燒技術(shù)的應(yīng)用 483.3三維制圖 493.4總結(jié) 521緒論1.1加熱爐的基本構(gòu)成加熱爐是一個復(fù)雜的熱工設(shè)備，它由以下幾個基本部分構(gòu)：爐膛、燃料系統(tǒng)、供風(fēng)系統(tǒng)、排煙系統(tǒng)、冷卻系統(tǒng)、余熱利用裝置、裝出料設(shè)備、檢測及調(diào)節(jié)裝置、電子計算機(jī)控制系統(tǒng)等。1.2步進(jìn)式加熱爐的特點(diǎn)常用的火焰爐爐型有環(huán)形爐、推鋼爐及近些年來推廣起來的步進(jìn)爐。環(huán)形爐的爐子生產(chǎn)率一般較低，產(chǎn)量受到限制。步進(jìn)爐和推鋼爐相比，則具有以下優(yōu)點(diǎn)：（1）加熱靈活在爐長一定的情況下，爐內(nèi)料坯數(shù)目是可變的。而在推鋼加熱爐中則是不變的，那樣加熱時間就受到了限制這對鋼種來說是不利的，而步進(jìn)爐在爐子產(chǎn)量變化的情況下可以通過改變料坯間的距離來達(dá)到改變或加熱時間不變的目的。（2）加熱質(zhì)量好因?yàn)樵诓竭M(jìn)爐內(nèi)使料坯間留有一定的間隙，這樣擴(kuò)大了受熱面，加熱容易均勻，斷面溫差小，鋼坯表面沒有劃痕，兩面加熱的步進(jìn)爐比推鋼式的加熱爐要小。（3）爐長不受限制對連續(xù)加熱爐來說爐長受到推鋼長度的限制，而步進(jìn)爐則不受限制。而且對于不利推鋼的細(xì)長料坯、圓棒、彎曲料坯等均可在步進(jìn)爐中加熱。（4）操作方便，改善了勞動條件如不容易混鋼號，在必要時可以將鋼坯部分或全部退到爐外，開爐時間可以縮短，由于不會粘鋼，可減輕繁重的體力勞動；和軋機(jī)配合比較方便、靈活。（5）便于實(shí)現(xiàn)自動化控制可以準(zhǔn)確的控制爐內(nèi)鋼坯的位置但是步進(jìn)爐也存在一定的缺點(diǎn)，主要是造價比較高，基建施工土方量比較大，要求機(jī)電設(shè)備維護(hù)水平比較高，在操作中要求對爐底勤加維護(hù)并及時清渣，經(jīng)常保持動床和定床平直以防料坯跑偏。綜合上面的優(yōu)缺點(diǎn)，步進(jìn)加熱爐的優(yōu)點(diǎn)較多方便操作，所以，在本次設(shè)計中選用了步進(jìn)式加熱爐，這也是現(xiàn)在的大型鋼鐵廠的首選。1.3步進(jìn)式加熱爐的發(fā)展趨勢伴隨著加熱爐的發(fā)展，未來的步進(jìn)爐熱裝技術(shù)對爐子提出了更新的要求，主要有：(1)鋼坯入爐溫度較高，表面硬度低，要求輸送過程中不損傷表面。可采取的措施有：a裝鋼機(jī)代替推鋼機(jī)裝爐，裝料室隨之取消；b步進(jìn)機(jī)械輸送時輕拿輕放。(2)直接熱裝的裝爐節(jié)奏取決于連鑄機(jī)，要求爐子在裝料節(jié)奏與軋制節(jié)奏不匹配時仍能適應(yīng)?？刹扇〉膶Σ哂校篴裝鋼機(jī)設(shè)計成長行程的，可將鋼坯送入爐子深處；b步進(jìn)梁在爐子中間分段，兩段可分別動作，分段處裝射線或激光探測鋼坯的位置，但分段操作非常復(fù)雜；c爐子分段處及進(jìn)出料端裝設(shè)工業(yè)電視監(jiān)視；b計算機(jī)對鋼坯進(jìn)行定位和跟蹤。(3)非常靈活的加熱制度，能同時加熱溫度不同的入爐鋼坯，包括冷熱混裝。(4)鋼坯入爐溫度不同，供熱負(fù)荷波動大時，要求能穩(wěn)定燃燒，均勻加熱。(5)實(shí)現(xiàn)計算機(jī)控制。1.4設(shè)計的主要內(nèi)容本次設(shè)計我們利用VisualStudio2010編程軟件對以下幾方面進(jìn)行設(shè)計編程（1）燃料燃燒的計算，燃料燃燒部分的計算是整個設(shè)計的基礎(chǔ)，在這部分確定了單位燃料空氣需要量，煙氣量及燃燒組分氣體分壓。（2）爐膛熱交換計算，計算爐氣導(dǎo)來系數(shù)，定出爐子相關(guān)尺寸及爐氣溫度。（3）金屬加熱部分的計算，主要是金屬加熱部分的計算，包括金屬加熱時間計算。（4）爐體尺寸的計算，確定爐子各部分尺寸。（5）爐子熱平衡的計算，這部分主要利用收入和支出熱平衡確定燃料消耗量及空氣需要量。同時這部分也能判斷出設(shè)計的爐子性能：如爐外表面溫度，燃料消耗量及熱損失情況。（6）換熱器的計算，確定換熱器的各熱效率（7）排煙系統(tǒng)的阻力損失計算，主要確定排煙系統(tǒng)各部分阻力損失以便確定煙囪高度。（8）送風(fēng)系統(tǒng)的計算，確定送風(fēng)系統(tǒng)各部分阻力損失。（9）爐底水管強(qiáng)度的校核，對當(dāng)前選用的水管強(qiáng)度進(jìn)行檢驗(yàn)。2基于VB的步進(jìn)式加熱爐設(shè)計計算軟件2.1軟件開發(fā)背景加熱爐是軋鋼廠的主要設(shè)備之一，其任務(wù)不僅僅是將爐溫保持在規(guī)定的設(shè)定值，而且還要滿足軋件的加熱工藝要求。評價加熱爐性能的主要指標(biāo)是加熱爐的單位燃耗、產(chǎn)量、金屬的加熱質(zhì)量等。隨著技術(shù)的進(jìn)步和節(jié)能工作的進(jìn)一步深入,對加熱爐的設(shè)計提出了更高的要求。加熱爐設(shè)計過程中，數(shù)學(xué)運(yùn)算是很枯燥繁瑣，而且現(xiàn)在對于計算精度要求也越來越高。利用計算機(jī)強(qiáng)大的計算性能，不但可以大大提高工作效率，減輕設(shè)計人員的工作強(qiáng)度，而且能提高設(shè)計計算的精確性，從而保證了產(chǎn)品的優(yōu)良品質(zhì)。為此利用VB編程技術(shù)開發(fā)出加熱爐設(shè)計計算軟件，用于加熱爐計算機(jī)輔助設(shè)計。2.2加熱爐計算軟件設(shè)計過程的實(shí)現(xiàn)2.2.1加熱爐設(shè)計基本參數(shù)輸入加熱爐的設(shè)計首先要確定相關(guān)基本參數(shù)，包括爐子生產(chǎn)率、加熱鋼種尺寸、鋼坯的單重、板坯加熱初始溫度、板坯加熱終了溫度、板坯加熱終了斷面溫差、空氣預(yù)熱溫度、出爐煙氣溫度。程序?qū)崿F(xiàn)步驟如下：（1）基本參數(shù)的輸入，賦值給相應(yīng)全局變量；（2）參數(shù)自動生成至word文檔，便于設(shè)計過程中查閱。2.2.2燃料燃燒設(shè)計計算鋼鐵廠加熱爐大多數(shù)使用自產(chǎn)的高、焦?fàn)t煤氣，但是由于煤氣的熱值及壓力波動較大，因此對加熱爐的爐型設(shè)計帶來了很多困難,所以必須對加熱爐使用的燃料進(jìn)行燃燒計算，其程序計算步驟如下：（1）原始數(shù)據(jù)的輸入。輸入燃料成分和空氣過剩系數(shù)；（2）計算高爐、焦?fàn)t煤氣低發(fā)熱值（3）計算混合煤氣的重度；（4）計算理論和實(shí)際的空氣需要量；（5）計算完全燃燒的產(chǎn)物成分、生成量和重度；（6）計算燃燒產(chǎn)物中各種成分體積和百分含量（7）計算結(jié)果的輸出；（8）燃料成分或空氣過剩系數(shù)變化時,重復(fù)上述步驟（2）、（3）、（4）、（5）、（6）和（7）。2.2.3爐膛熱交換計算加熱爐爐膛的熱交換是一個相當(dāng)復(fù)雜的過程,不僅有傳導(dǎo)、對流及輻射三種熱交換方式同時存在，而且爐內(nèi)各處的溫度、爐氣速度和壓力都是不均勻的。為使本設(shè)計計算軟件具有普遍性，特做如下假設(shè)：（1）爐氣充滿爐膛，且在整個分區(qū)的體積內(nèi)溫度是均勻的；（2）爐襯表面和鋼坯表面的溫度都是均勻的；（3）爐氣以對流方式傳給爐襯的熱流在數(shù)值上等于爐襯的散熱。爐內(nèi)熱交換程序計算步驟如下：（1）輸入各段爐膛高度（2）輸出計算結(jié)果；（4）輸入?yún)?shù)發(fā)生變化時，重復(fù)上述步驟（1）和（2）2.2.4金屬加熱的設(shè)計計算根據(jù)加熱爐基本設(shè)計參數(shù)以及前面計算結(jié)果，金屬加熱程序計算步驟如下：（1）計算各段的加熱時間、長度及總加熱時間、爐子總長度；（2）輸出計算結(jié)果；（3）初始參數(shù)發(fā)生變化時，重復(fù)上述步驟（1）和（2）。2.2.5爐子熱平衡計算根據(jù)加熱爐基本設(shè)計參數(shù)以及前面計算結(jié)果，爐子熱平衡程序計算步驟如下：（1）輸入空氣熱焓量，煙氣熱焓量及爐門參數(shù)（2）計算爐子各熱支出項(xiàng)與收入項(xiàng)；（3）輸出計算結(jié)果；（4）空氣熱焓量，煙氣熱焓量及爐門參數(shù)爐門等參數(shù)變化時，重復(fù)上述步驟（2）和（3）。2.2.6換熱器計算軟件中所選換熱器形式為U型管換熱器，根據(jù)排煙溫度、煙氣量、初始空氣溫度、空氣預(yù)熱溫度以及預(yù)熱空氣量，換熱器程序計算步驟如下：（1）計算對數(shù)平均溫差；（2）計算換熱器總傳熱系數(shù)；（3）確定換熱器面積和管子數(shù)目；（4）計算換熱器經(jīng)濟(jì)指標(biāo)；（5）輸出計算結(jié)果；（6）當(dāng)計算參數(shù)發(fā)生變化時，重復(fù)上述步驟（1）、（2）、（3）、（4）和（5）。圖3.2金屬加熱計算流程圖圖3.2金屬加熱計算流程圖Fig3.2Metalheatingcalculationflowchart2.2.7排煙系統(tǒng)阻力損失計算根據(jù)出爐煙氣量、經(jīng)過換熱器煙氣量、煙氣出爐溫度、換熱器前后煙氣溫度、煙氣重度和排煙方式等計算排煙系統(tǒng)阻力損失。計算依據(jù)是將煙道按一定的特點(diǎn)分成若干段，逐段進(jìn)行計算，然后相加得總的阻力損失。程序計算步驟如下：（1）計算煙道總阻力損失；（2）煙囪計算；（3）輸出計算結(jié)果；（4）當(dāng)計算參數(shù)發(fā)生變化時,重復(fù)上述步驟（1）和（2）。2.2.8送風(fēng)系統(tǒng)及爐底水管校核計算計算的主要目的是求出供風(fēng)系統(tǒng)阻力損失，以作為選擇風(fēng)機(jī)的依據(jù)之一，根據(jù)空氣量、空氣預(yù)熱溫度和換熱器前后空氣流速等計算送風(fēng)系統(tǒng)，其方法是分段進(jìn)行計算，然后將各段阻力損失相加以求得總阻力損失。程序計算步驟如下：（1）計算空氣管道直徑；（2）計算空氣管道阻力損失；（3）輸出計算結(jié)果；（4）當(dāng)計算參數(shù)發(fā)生變化時，重復(fù)上述步驟（1）、（2）和（3）。2.2.9爐底水管強(qiáng)度校核根據(jù)鋼坯單重，爐寬，鋼管尺寸，支撐縱水管管數(shù)等進(jìn)行爐底水管校核，計算步驟如下：（1）計算梁的斷面系數(shù)；（2）鋼管的斷面系數(shù)；（3）最大撓度與跨度比值；（4）輸出計算結(jié)果；（5）計算參數(shù)變化時，重復(fù)（1）、（2）、（3）和（4）。2.3加熱爐設(shè)計計算軟件的運(yùn)行2.3.1程序登錄雙擊計算軟件圖標(biāo)，彈出登錄窗口，如圖2.1所示。在用戶窗口輸入用戶名：VB，點(diǎn)擊“確定”，將進(jìn)入主設(shè)計界面，如圖2.2所示。點(diǎn)擊“重新登錄”則退出到登錄窗口。當(dāng)點(diǎn)擊主設(shè)計界面上計算項(xiàng)目所列各按鈕，將進(jìn)入相應(yīng)計算過程。使用中請嚴(yán)格按照計算步驟進(jìn)行操作，否則可能出現(xiàn)運(yùn)行錯誤。圖2.1加熱爐設(shè)計計算軟件登陸界面圖2.2加熱爐設(shè)計計算軟件主設(shè)計界面2.3.2加熱爐設(shè)計基本參數(shù)輸入進(jìn)入軟件主設(shè)計界面后，點(diǎn)擊“加熱爐設(shè)計基礎(chǔ)數(shù)據(jù)”按鈕，進(jìn)入加熱爐基礎(chǔ)數(shù)據(jù)輸入主界面，如圖2.3所示。在界面各參數(shù)窗口中輸入相應(yīng)參數(shù)，然后點(diǎn)擊“讀取參數(shù)”按鈕，輸入的基本數(shù)據(jù)將記錄進(jìn)軟件全局變量中。點(diǎn)擊“主菜單”按鈕，返回軟件主設(shè)計界面。圖2.3加熱爐設(shè)計計算軟件基本參數(shù)輸入界面2.3.3燃料燃燒計算操作在軟件主設(shè)計界面點(diǎn)擊“燃料燃燒計算”按鈕，進(jìn)入燃料燃燒計算界面，如圖2.4、2.5所示。圖2.4加熱爐設(shè)計計算軟件燃料燃燒計算界面圖2.5加熱爐設(shè)計計算軟件燃料燃燒計算界面（不同溫度下飽和水蒸氣表）在數(shù)據(jù)輸入窗口中按要求輸入煤氣成分、空氣過剩系數(shù)等。然后點(diǎn)擊“確定”按鈕，軟件將進(jìn)行燃料燃燒計算。點(diǎn)擊“主菜單”按鈕，返回軟件主設(shè)計界面。2.3.4爐膛熱交換計算操作在軟件主設(shè)計界面點(diǎn)擊“爐膛熱交換計算”按鈕，進(jìn)入爐膛熱交換計算界面，如圖2.6、2.7、2.8、2.9、2.10所示。先輸入各相關(guān)數(shù)據(jù)點(diǎn)擊“確定”按鈕，進(jìn)行爐膛熱交換計算。點(diǎn)擊“主菜單”按鈕，返回軟件主設(shè)計界面。圖2.6加熱爐設(shè)計計算軟件爐膛熱交換計算界面圖2.7加熱爐設(shè)計計算軟件爐膛熱交換計算界面圖2.8加熱爐設(shè)計計算軟件爐膛熱交換計算界面圖2.9加熱爐設(shè)計計算軟件爐膛熱交換計算界面圖2.10加熱爐設(shè)計計算軟件爐膛熱交換計算界面2.3.5金屬加熱時間計算操作在軟件主設(shè)計界面點(diǎn)擊“金屬加熱時間計算”按鈕，進(jìn)入金屬加熱計算界面，如圖2.11、2.12所示。輸入相應(yīng)的熱焓和熱導(dǎo)率，點(diǎn)擊“確定”按鈕,軟件將自動進(jìn)行計算點(diǎn)擊“主菜單”按鈕，返回軟件主設(shè)計界面。圖2.11加熱爐設(shè)計計算軟件金屬加熱時間計算界面圖2.12加熱爐設(shè)計計算軟件金屬加熱時間計算界面2.3.6爐子熱平衡計算操作在軟件主設(shè)計界面點(diǎn)擊“爐子熱平衡計算”按鈕，進(jìn)入金屬加熱計算界面，如圖2.13、2.14所示。輸入空氣和煙氣的熱焓量，以及爐門的參數(shù)，點(diǎn)擊“確定”按鈕,軟件將自動進(jìn)行計算，隨后將會在熱收入與支出項(xiàng)表格中自動顯示計算結(jié)果。點(diǎn)擊“主菜單”按鈕，返回軟件主設(shè)計界面。圖2.13加熱爐設(shè)計計算軟件爐子熱平衡計算界面圖2.14加熱爐設(shè)計計算軟件爐子熱平衡計算界面（爐水管參數(shù)）2.3.7換熱器計算操作在軟件主設(shè)計界面點(diǎn)擊“換熱器計算”按鈕，進(jìn)入金屬加熱計算界面，如圖2.15、2.16、2.17所示。根據(jù)所提示的數(shù)據(jù)進(jìn)行輸入，點(diǎn)擊“確定”按鈕，程序?qū)⑦M(jìn)行計算，點(diǎn)擊“主菜單”按鈕，返回軟件主設(shè)計界面。 圖2.15加熱爐設(shè)計計算軟件換熱器計算界面圖2.16加熱爐設(shè)計計算軟件換熱器計算界面（溫焓表）圖2.17加熱爐設(shè)計計算軟件換熱器計算界面（傳熱系數(shù)表）2.3.8排煙系統(tǒng)計算操作在軟件主設(shè)計界面點(diǎn)擊“排煙系統(tǒng)阻力損失計算”按鈕，進(jìn)入排煙損失計算界面，如圖2.18所示。點(diǎn)擊“確定”按鈕，程序?qū)⑦M(jìn)行計算點(diǎn)擊“主菜單”按鈕，返回軟件主設(shè)計界面。圖2.18加熱爐設(shè)計計算軟件排煙系統(tǒng)阻力損失計算界面2.3.9送風(fēng)系統(tǒng)計算操作在軟件主設(shè)計界面點(diǎn)擊“送風(fēng)計算”按鈕，進(jìn)入送風(fēng)系統(tǒng)計算界面，如圖2.19所示。點(diǎn)擊“確定”按鈕，程序?qū)⑦M(jìn)行計算，點(diǎn)擊“主菜單”按鈕，返回軟件主設(shè)計界面。圖2.19加熱爐設(shè)計計算軟件送風(fēng)系統(tǒng)計算界面2.3.10爐底水管校核計算操作在軟件主設(shè)計界面點(diǎn)擊“爐底水管強(qiáng)度校核計算”按鈕，進(jìn)入爐底水管校核計算界面，如圖2.20、2.21所示。點(diǎn)擊“確定”按鈕，程序?qū)⑦M(jìn)行校核計算，如果滿足校核強(qiáng)度要求，軟件會提示您選擇的鋼材合格，否則顯示不合格，點(diǎn)擊“主菜單”按鈕，返回軟件主設(shè)計界面。圖2.20加熱爐設(shè)計計算軟件爐底水管強(qiáng)度校核界面圖2.21加熱爐設(shè)計計算軟件爐底水管強(qiáng)度校核界面至此，整個步進(jìn)式加熱爐計算軟件計算過程結(jié)束。結(jié)論以步進(jìn)式加熱爐基本設(shè)計計算為基礎(chǔ)，我們利用VisualStudio2010中VB的各項(xiàng)功能對步進(jìn)式加熱爐進(jìn)行設(shè)計計算，方便快捷的得出了加熱爐燃燒計算、爐膛熱交換計算、金屬加熱時間計算、爐子熱平衡計算、換熱器計算、排煙系統(tǒng)計算、送風(fēng)系統(tǒng)計算和爐底校核計算，。下面是帶入一組數(shù)據(jù)所得到的計算結(jié)果截圖：基本參數(shù)輸入：燃料燃燒計算：爐膛熱交換：金屬加熱時間：爐子熱平衡：換熱器：排煙系統(tǒng)：送風(fēng)系統(tǒng)：爐底水管強(qiáng)度校核：誤差分析：在本次設(shè)計計算中存在一些誤差，下面對誤差進(jìn)行分析。計算誤差。包括數(shù)據(jù)進(jìn)位和查表帶來的誤差。假設(shè)數(shù)據(jù)誤差。在設(shè)計中有大量的數(shù)據(jù)都是假設(shè)出來的，盡管經(jīng)過修正，但是依然不精確。如計算加熱時間時的熱流逼算。計算方法，在計算中有許多中方法可以選擇，由于參數(shù)不全，經(jīng)驗(yàn)不足可能選取的方法不完全合理，這也為計算帶來了誤差。致謝本畢業(yè)設(shè)計是在劉峰老師的細(xì)心指導(dǎo)和協(xié)助下完成的，劉老師工作繁忙，但仍在百忙之中給予我認(rèn)真細(xì)致的指導(dǎo)。在設(shè)計中，為我指出了設(shè)計思路、指明了設(shè)計方向，并且耐心給予講解設(shè)計中的疑難問題，及時指出不足之處,使我的畢業(yè)設(shè)計能夠順利完成并且少走了許多彎路，在設(shè)計期間為我們提供了大量相關(guān)的設(shè)計資料，在此，我對劉老師表示最崇高的敬意和誠摯的感謝。劉老師淵博多才、嚴(yán)謹(jǐn)?shù)闹螌W(xué)態(tài)度給我留下了深刻的印象，使我終生受益，立為榜樣。同時，還要感謝栗霽、洪林同在設(shè)計中給予的幫助。附錄A1燃料燃燒計算PrivateSubButton4_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton4.ClickDima1!,a2%,a3%,a4%,a5%,a6%,a7%,a8%,a9%,m1!,n1!,m2!,n2!,m3!,b1!,b2!,b3!,b4!,b5!,m4!,c1!,c2!,c3!,c4!,c5!,m5!,shuishui=100*Val(TextBox26.Text)/(803.6+Val(TextBox26.Text))a1=Val(TextBox1.Text)*((100-(100*Val(TextBox26.Text)/(803.6+Val(TextBox26.Text))))/100)a2=Val(TextBox2.Text)*((100-(100*Val(TextBox26.Text)/(803.6+Val(TextBox26.Text))))/100)a3=Val(TextBox3.Text)*((100-(100*Val(TextBox26.Text)/(803.6+Val(TextBox26.Text))))/100)a4=Val(TextBox4.Text)*((100-(100*Val(TextBox26.Text)/(803.6+Val(TextBox26.Text))))/100)a5=Val(TextBox5.Text)*((100-(100*Val(TextBox26.Text)/(803.6+Val(TextBox26.Text))))/100)a6=Val(TextBox6.Text)*((100-(100*Val(TextBox26.Text)/(803.6+Val(TextBox26.Text))))/100)a7=Val(TextBox7.Text)*((100-(100*Val(TextBox26.Text)/(803.6+Val(TextBox26.Text))))/100)a8=Val(TextBox8.Text)*((100-(100*Val(TextBox26.Text)/(803.6+Val(TextBox26.Text))))/100)a9=Val(TextBox9.Text)*((100-(100*Val(TextBox26.Text)/(803.6+Val(TextBox26.Text))))/100)'m1=4.18*(30.46*a1+30.5*a3+95.3*a4+152.5*a7+60.0*a9)'n1=4.18*(30.46*a1+25.8*a3+85.5*a4+141.0*a7+55.2*a9)m1=126.4*a1+127.7*a3+397.7*a4+696.6*a8+630*a7+257*a9n1=126.5*a1+108.1*a3+359.6*a4+636.3*a8+589.8*a7+236.9*a9TextBox11.Text=Math.Round(m1,3)TextBox12.Text=Math.Round(n1,3)'m2=(28*Val(TextBox1.Text)+44*Val(TextBox2.Text)+16*Val(TextBox4.Text)+30*Val(TextBox8.Text)+2*Val(TextBox3.Text)+28*Val(TextBox6.Text)+18*shui+32*Val(TextBox5.Text))/(22.4*100)m2=(28*a1+44*a2+2*a3+16*a4+32*a5+28*a6+28*a7+30*a8+34*a9+18*shui)/(22.4*100)TextBox13.Text=Math.Round(m2,3)'n2=(0.5*Val(TextBox1.Text)+0.5*Val(TextBox3.Text)+1.5*Val(TextBox9.Text)+2*Val(TextBox4.Text)+3*Val(TextBox7.Text)+3.5*Val(TextBox8.Text)-Val(TextBox5.Text))/(21*100)n2=(1/21)*(0.5*a1+0.5*a3+1.5*a9+2*a4+3*a7+3.5*a8-a5)TextBox14.Text=Math.Round(n2,3)m3=Val(TextBox10.Text)*n2TextBox15.Text=Math.Round(m3,3)'b1=0.01*(Val(TextBox2.Text)+Val(TextBox1.Text)+Val(TextBox4.Text)+2*Val(TextBox7.Text)+2*Val(TextBox8.Text))b1=0.1*(a2+a1+a4+a7+a8)'b2=0.01*(Val(TextBox3.Text)+2*Val(TextBox4.Text)+2*Val(TextBox7.Text)+100*Val(TextBox26.Text)/(803.6+Val(TextBox26.Text))+3*Val(TextBox8.Text)+Val(TextBox9.Text))b2=0.01*(a3+2*a4+2*a7+3*a8)'b3=0.01*(Val(TextBox6.Text+79*m3))b3=0.79*Val(TextBox14.Text)+0.01*a6'b4=0.01*Val(TextBox9.Text)b4=0.01*a9b5=0.01*(21*(Val(TextBox10.Text)-1)*Val(TextBox14.Text))m4=b1+b2+b3+b4+b5TextBox16.Text=Math.Round(m4,3)TextBox18.Text=Math.Round(b1,3)TextBox19.Text=Math.Round(b2,3)TextBox20.Text=Math.Round(b3,3)TextBox21.Text=Math.Round(b4,3)TextBox27.Text=Math.Round(b5,3)c1=100*b1/m4c2=100*b2/m4c3=100*b3/m4c4=100*b4/m4c5=100*b5/m4TextBox22.Text=Math.Round(c1,2)TextBox23.Text=Math.Round(c2,2)TextBox24.Text=Math.Round(c3,2)TextBox25.Text=Math.Round(c4,2)TextBox28.Text=Math.Round(c5,2)m5=(44*c1+18*c2+28*c3+64*c4+32*c5)/(22.3*100)TextBox17.Text=Math.Round(m5,2)EndSub2爐膛熱交換計算PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimN!,B!,L加¨?1,L加¨?2,L預(yù)?è,L均¨′,F底ì?á加¨?1,F底ì?á加¨?2,F底ì?á預(yù)?è,F底ì?á均¨′,F墻?加¨?1,F墻?加¨?2,F墻?預(yù)?è,F墻?均¨′,F頂￡¤加¨?1,F頂￡¤加¨?2,F頂￡¤預(yù)?è,F頂￡¤均¨′,F加¨?1,F加¨?2,F預(yù)?è,F均¨′,V加¨?1,V加¨?2,V預(yù)?è,V均¨′,S加¨?1!,S加¨?2!,S預(yù)?è!,S均¨′!,d1!,d2!,d3!,d4!,d5!,d6!,z1,z2,z3,ε?氣?加¨?1,ε?氣?加¨?2,ε?氣?加¨?預(yù)?è,ε?氣?加¨?均¨′,ψ?á加¨?12,ψ?á預(yù)?è,ψ?á均¨′,C加¨?1!,C加¨?2!,C預(yù)?è!,C均¨′!,C!L加¨?1=1L加¨?2=2L預(yù)?è=3L均¨′=4TabControl1.Visible=TrueOvalShape1.Visible=FalseRadioButton1.Visible=FalseRadioButton2.Visible=FalseTextBox2.Enabled=FalseTextBox3.Enabled=FalseTextBox4.Enabled=FalseTextBox5.Enabled=FalseTextBox6.Enabled=FalseIfRadioButton1.Checked=TrueThenN=1Else:N=2EndIfB=CInt(N*Val(Form3.TextBox7.Text)/1000+(N+1)*0.2)TextBox1.Text=B'爐?￥底ì?á面?積yF底ì?á加¨?1=B*L加¨?1F底ì?á加¨?2=B*L加¨?2F底ì?á預(yù)?è=B*L預(yù)?èF底ì?á均¨′=B*L均¨′'爐?￥墻?與??爐?￥頂￡¤內(nèi)¨2表à¨a面?積y'爐?￥墻?F墻?加¨?1=2*Val(TextBox2.Text)*L加¨?1F墻?加¨?2=2*Val(TextBox3.Text)*L加¨?2F墻?預(yù)?è=2*Val(TextBox4.Text)*L預(yù)?èF墻?均¨′=2*Val(TextBox5.Text)*L均¨′'爐?￥頂￡¤F頂￡¤加¨?1=B*L加¨?1F頂￡¤加¨?2=B*L加¨?2F頂￡¤預(yù)?è=B*L預(yù)?èF頂￡¤均¨′=B*L均¨′'爐?￥氣?外aa圍?ì總á¨1表à¨a面?積yF加¨?1=F墻?加¨?1+F頂￡¤加¨?1+F底ì?á加¨?1F加¨?2=F墻?加¨?2+F頂￡¤加¨?2+F底ì?á加¨?2F預(yù)?è=F墻?預(yù)?è+F頂￡¤預(yù)?è+F底ì?á預(yù)?èF均¨′=F墻?均¨′+F頂￡¤均¨′+F底ì?á均¨′'爐?￥墻?被à?爐?￥氣?充?滿¨2的ì?體??積yV加¨?1=Val(TextBox2.Text)*B*L加¨?1V加¨?2=Val(TextBox3.Text)*B*L加¨?2V預(yù)?è=Val(TextBox4.Text)*B*L預(yù)?èV均¨′=Val(TextBox5.Text)*B*L均¨′'平?均¨′有?D效?ì射|?線?長?è度¨¨S加¨?1=0.9*4*V加¨?1/F加¨?1S加¨?2=0.9*4*V加¨?2/F加¨?2S預(yù)?è=0.9*4*V預(yù)?è/F預(yù)?èS均¨′=0.9*4*V均¨′/F均¨′TextBox7.Text=S加¨?1TextBox8.Text=S加¨?2TextBox9.Text=S預(yù)?èTextBox10.Text=S均¨′'輻¤?射|?氣?體??分¤?壓1與??平?均¨′有?D效?ì射|?線?長?è度¨¨之?積yd1=Val(Form4.TextBox22.Text)*Val(TextBox7.Text)/100d2=Val(Form4.TextBox23.Text)*Val(TextBox7.Text)/100d3=Val(Form4.TextBox22.Text)*Val(TextBox9.Text)/100d4=Val(Form4.TextBox23.Text)*Val(TextBox9.Text)/100d5=Val(Form4.TextBox22.Text)*Val(TextBox10.Text)/100d6=Val(Form4.TextBox23.Text)*Val(TextBox10.Text)/100TextBox11.Text=d1TextBox12.Text=d2TextBox13.Text=d3TextBox14.Text=d4TextBox15.Text=d5TextBox16.Text=d6'爐?￥氣?溫?度¨¨z1=Val(Form3.TextBox3.Text)TextBox17.Text=z1+50z2=Val(TextBox17.Text)z3=z2+50TextBox18.Text=z3TextBox19.Text=(z2+Val(Form3.TextBox6.Text))/2TextBox20.Text=z1+30'爐?￥氣?黑¨2度¨¨ε?氣?加¨?1=0.282ε?氣?加¨?2=0.285ε?氣?加¨?預(yù)?è=0.29ε?氣?加¨?均¨′=0.32'爐?￥膛??對?金e屬o?的ì?角?度¨¨系|ì數(shù)oyψ?á加¨?12=F底ì?á加¨?1/(F墻?加¨?1+F頂￡¤加¨?1)ψ?á預(yù)?è=F底ì?á預(yù)?è/(F墻?預(yù)?è+F頂￡¤預(yù)?è)ψ?á均¨′=F底ì?á均¨′/(F墻?均¨′+F頂￡¤均¨′)'導(dǎo)ì?來¤??輻¤?射|?系|ì數(shù)oyC加¨?1=4.9*ε?氣?加¨?1*0.8*(1+ψ?á加¨?12*(1-ε?氣?加¨?1))/(ε?氣?加¨?1+ψ?á加¨?12*(1-ε?氣?加¨?1)*(0.8+ε?氣?加¨?1*(1-0.8)))C加¨?2=4.9*ε?氣?加¨?2*0.8*(1+ψ?á加¨?12*(1-ε?氣?加¨?2))/(ε?氣?加¨?2+ψ?á加¨?12*(1-ε?氣?加¨?2)*(0.8+ε?氣?加¨?2*(1-0.8)))C預(yù)?è=4.9*ε?氣?加¨?預(yù)?è*0.8*(1+ψ?á預(yù)?è*(1-ε?氣?加¨?預(yù)?è))/(ε?氣?加¨?預(yù)?è+ψ?á預(yù)?è*(1-ε?氣?加¨?預(yù)?è)*(0.8+ε?氣?加¨?預(yù)?è*(1-0.8)))C均¨′=4.9*ε?氣?加¨?均¨′*0.8*(1+ψ?á均¨′*(1-ε?氣?加¨?均¨′))/(ε?氣?加¨?均¨′+ψ?á均¨′*(1-ε?氣?加¨?均¨′)*(0.8+ε?氣?加¨?均¨′*(1-0.8)))C=(C加¨?1+C加¨?2+C預(yù)?è+C均¨′)/4TextBox21.Text=C加¨?1TextBox22.Text=C加¨?2TextBox23.Text=C預(yù)?èTextBox24.Text=C均¨′TextBox25.Text=CEndSub3金屬加熱時間計算PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimτ¨?4!,L!,L0!,τ¨?!,q1!,q0!,A1!,B1!,qy!,τ¨?1!,τ¨?2!,L1加¨?!,L2加¨?!,L預(yù)?è!,L均¨′!GroupBox1.Visible=TrueTextBox14.Enabled=FalseTextBox15.Enabled=FalseTextBox16.Enabled=FalseTextBox17.Enabled=FalseTextBox18.Enabled=FalseTextBox19.Enabled=FalseTextBox20.Enabled=Falseτ¨?4=Val(Form15.TextBox2.Text)*((Val(Form3.TextBox9.Text)/2000)^2)/0.02TextBox4.Text=τ¨?4L0=(Val(Form3.TextBox1.Text)*1.1*1000)/5478.4L=(Val(Form3.TextBox1.Text)*1.1*1000)/5478.4+2.5TextBox10.Text=Lτ¨?=(L*Val(Form3.TextBox10.Text))/(Val(Form3.TextBox1.Text)*320)TextBox9.Text=τ¨?q1=120164A1=((Val(Form3.TextBox6.Text)+273)/100)^4B1=((Val(Form3.TextBox2.Text)+273)/100)^4q0=Val(Form5.TextBox21.Text)*(A1-B1)qy=(q1*q0)^0.5τ¨?1=75.3*7660*(Val(Form3.TextBox9.Text)/2000)/qyτ¨?2=53*7450*(Val(Form3.TextBox9.Text)/2000)/56437TextBox1.Text=τ¨?-(τ¨?1+τ¨?2+τ¨?4)TextBox2.Text=τ¨?2TextBox3.Text=τ¨?1L1加¨?=L0*Val(TextBox1.Text)/τ¨?L2加¨?=L0*Val(TextBox2.Text)/τ¨?L預(yù)?è=L0*Val(TextBox3.Text)/τ¨?L均¨′=L0*Val(TextBox4.Text)/τ¨?TextBox5.Text=L1加¨?TextBox6.Text=L2加¨?TextBox7.Text=L預(yù)?èTextBox8.Text=L均¨′EndSubPrivateSubForm6_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.LoadDimq4!,tg4!,q3!,Δ?èt3!,δ?!,A!,B!q4=4*Val(TextBox14.Text)*Val(Form3.TextBox4.Text)/(Val(Form3.TextBox9.Text)/1000)tg4=100*(q4/Val(Form5.TextBox24.Text)+((Val(Form3.TextBox3.Text)+273)/100)^4)^0.25'q3=Val(Form5.TextBox22.Text)*(((Val(Form5.TextBox18.Text)+273)/100)^4)-((Val(Form3.TextBox3.Text)+273)/100)^4A=((Val(Form5.TextBox18.Text)+273)/100)^4B=((Val(Form3.TextBox3.Text)+273)/100)^4q3=Val(Form5.TextBox22.Text)*(A-B)Δ?èt3=q3*(Val(Form3.TextBox9.Text)/1000)/(4*Val(TextBox19.Text))'均¨′熱¨¨¨時o?à間?δ?=Val(Form3.TextBox4.Text)/Δ?èt3TextBox20.Text=δ?TextBox11.Text=Val(Form3.TextBox3.Text)-2*Val(Form3.TextBox4.Text)/3TextBox12.Text=Val(Form3.TextBox3.Text)TextBox13.Text=1100EndSub4爐子平衡PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimB!,Q燒|?!,Q空?!,Q氧?化?￥!,Q效?ì!,Q煙¨?!,Q爐?￥體??!,Q爐?￥門?!,q門?加¨?!,q門?均¨′!,q門?預(yù)?è!,o1!,o2!,o3!,q輻¤?1!,q輻¤?2!,Q氧?鐵?¨2!,Q冷¤?卻¨??!,F固¨?預(yù)?è!,F活?預(yù)?è!,Fy!,qy!,F固¨?1!,F活?1!,Fr1!,qr1!,F固¨?2!,F活?2!,Fr2!,qr2!,F固¨?均¨′!,F活?均¨′!,Fj!,qj!,A2!,B2!,C2!'收o?入¨?Q燒|?=B*Val(Form4.TextBox12.Text)'1Q空?=B*Val(Form4.TextBox15.Text)*Val(TextBox26.Text)'2Q氧?化?￥=5643*0.02*(Val(Form3.TextBox1.Text)*1000/0.98)'3'熱¨¨¨支?ì出?項(xiàng)?Q效?ì=Val(Form3.TextBox1.Text)*1000*855'4Q煙¨?=B*Val(Form4.TextBox16.Text)*Val(TextBox27.Text)'5Q爐?￥體??=2040000'6o1=4*Val(TextBox28.Text)*Val(TextBox29.Text)/1000000+1.105*0.58q門?加¨?=o1*(1195-Val(Form3.TextBox2.Text))/(0.13/4.97+0.06)o2=2*Val(TextBox28.Text)*Val(TextBox29.Text)/1000000+1.105*0.58q門?均¨′=o2*(1219-Val(Form3.TextBox2.Text))/(0.13/5+0.06)o3=2*Val(TextBox28.Text)*Val(TextBox29.Text)/1000000q門?預(yù)?è=o3*(860-Val(Form3.TextBox2.Text))/(0.13/4.56+0.06)q輻¤?1=4.9*4*0.5*0.5*((Val(Form5.TextBox20.Text)+273)/100)^4q輻¤?2=4.9*4.64*0.58*0.5*((Val(Form5.TextBox19.Text)+273)/100)^4Q爐?￥門?=q門?加¨?+q門?均¨′+q門?預(yù)?è+q輻¤?1+q輻¤?2'7Q氧?鐵?¨2=0.02*(Val(Form3.TextBox1.Text)*1000/0.98)*0.3*1.38*(Val(Form3.TextBox3.Text-Val(Form3.TextBox2.Text)))'8F固¨?預(yù)?è=2*3.14*(Val(Form18.TextBox2.Text)/1000)*Val(Form6.TextBox7.Text)+(Val(Form18.TextBox11.Text)*Val(Form6.TextBox7.Text)*3.14*Val(Form18.TextBox2.Text)/1000*Val(Form18.TextBox5.Text))/(Val(Form6.TextBox10.Text)-2.5)F活?預(yù)?è=2*3.14*(Val(Form18.TextBox7.Text)/1000)*Val(Form6.TextBox7.Text)+(Val(Form18.TextBox11.Text)*Val(Form6.TextBox7.Text)*3.14*Val(Form18.TextBox7.Text)/1000*Val(Form18.TextBox10.Text))/(Val(Form6.TextBox10.Text)-2.5)Fy=Val(Form18.TextBox1.Text)*F固¨?預(yù)?è+Val(Form18.TextBox6.Text)*F活?預(yù)?èqy=11*Fy*(((Val(Form5.TextBox19.Text)+273)/100)^3.54)F固¨?1=2*3.14*Val(Form18.TextBox2.Text)/1000*Val(Form6.TextBox5.Text)+Val(Form18.TextBox11.Text)*Val(Form6.TextBox5.Text)*3.14*Val(Form18.TextBox2.Text)/1000*Val(Form18.TextBox4.Text)/(Val(Form6.TextBox10.Text)-2.5)F活?1=2*3.14*Val(Form18.TextBox7.Text)/1000*Val(Form6.TextBox5.Text)+Val(Form18.TextBox11.Text)*Val(Form6.TextBox5.Text)*3.14*Val(Form18.TextBox7.Text)/1000*Val(Form18.TextBox9.Text)/(Val(Form6.TextBox10.Text)-2.5)Fr1=Val(Form18.TextBox1.Text)*F固¨?1+Val(Form18.TextBox6.Text)*F活?1qr1=2.4*Fr1*((Val(Form5.TextBox17.Text)+273)/100)^4F固¨?2=2*3.14*Val(Form18.TextBox2.Text)/1000*Val(Form6.TextBox6.Text)+Val(Form18.TextBox11.Text)*Val(Form6.TextBox6.Text)*3.14*Val(Form18.TextBox2.Text)/1000*Val(Form18.TextBox4.Text)/(Val(Form6.TextBox10.Text)-2.5)F活?2=2*3.14*Val(Form18.TextBox7.Text)/1000*Val(Form6.TextBox6.Text)+Val(Form18.TextBox11.Text)*Val(Form6.TextBox6.Text)*3.14*Val(Form18.TextBox7.Text)/1000*Val(Form18.TextBox9.Text)/(Val(Form6.TextBox10.Text)-2.5)Fr2=Val(Form18.TextBox1.Text)*F固¨?2+Val(Form18.TextBox6.Text)*F活?2qr2=2.4*Fr2*((Val(Form5.TextBox18.Text)+273)/100)^4F固¨?均¨′=2*3.14*Val(Form18.TextBox2.Text)/1000*Val(Form6.TextBox8.Text)+Val(Form18.TextBox11.Text)*Val(Form6.TextBox8.Text)*3.14*Val(Form18.TextBox2.Text)/1000*Val(Form18.TextBox4.Text)/(Val(Form6.TextBox10.Text)-2.5)F活?均¨′=2*3.14*Val(Form18.TextBox7.Text)/1000*Val(Form6.TextBox8.Text)+Val(Form18.TextBox11.Text)*Val(Form6.TextBox8.Text)*3.14*Val(Form18.TextBox7.Text)/1000*Val(Form18.TextBox9.Text)/(Val(Form6.TextBox10.Text)-2.5)Fj=Val(Form18.TextBox1.Text)*F固¨?均¨′+Val(Form18.TextBox6.Text)*F活?均¨′qj=2.4*Fj*((Val(Form5.TextBox20.Text)+273)/100)^4Q冷¤?卻¨??=qy+qr1+qr2+qj'9'Q燒|?+Q空?+Q氧?化?￥=Q效?ì+Q煙¨?+Q爐?￥體??+Q爐?￥門?+Q氧?鐵?¨2+Q冷¤?卻¨??'Q燒|?+Q空?-Q煙¨?=Q效?ì+Q爐?￥體??+Q爐?￥門?+Q氧?鐵?¨2+Q冷¤?卻¨??-Q氧?化?￥'B*Val(Form4.TextBox12.Text)+B*Val(Form4.TextBox15.Text)*Val(TextBox26.Text)-B*Val(Form4.TextBox16.Text)*Val(TextBox27.Text)=Q效?ì+Q爐?￥體??+Q爐?￥門?+Q氧?鐵?¨2+Q冷¤?卻¨??-Q氧?化?￥B=(Q效?ì+Q爐?￥體??+Q爐?￥門?+Q氧?鐵?¨2+Q冷¤?卻¨??-Q氧?化?￥)/(Val(Form4.TextBox12.Text)+Val(Form4.TextBox15.Text)*Val(TextBox26.Text)-Val(Form4.TextBox16.Text)*Val(TextBox27.Text))TextBox25.Text=BA2=B*Val(Form4.TextBox12.Text)/(10^6)TextBox1.Text=A2B2=B*Val(Form4.TextBox15.Text)*Val(TextBox26.Text)/(10^6)TextBox2.Text=B2TextBox3.Text=Q氧?化?￥/(10^6)TextBox7.Text=Q效?ì/(10^6)C2=B*Val(Form4.TextBox16.Text)*Val(TextBox27.Text)/(10^6)TextBox8.Text=C2TextBox9.Text=Q爐?￥體??/(10^6)TextBox10.Text=Q爐?￥門?/(10^6)TextBox11.Text=Q冷¤?卻¨??/(10^6)TextBox12.Text=Q氧?鐵?¨2/(10^6)TextBox19.Text=Val(TextBox1.Text)+Val(TextBox2.Text)+Val(TextBox3.Text)TextBox4.Text=Format(Val(TextBox1.Text)/Val(TextBox19.Text)*100,"0.00")TextBox5.Text=Format(Val(TextBox2.Text)/Val(TextBox19.Text)*100,"0.00")TextBox6.Text=Format(Val(TextBox3.Text)/Val(TextBox19.Text)*100,"0.00")TextBox20.Text=100TextBox21.Text=Val(TextBox7.Text)+Val(TextBox8.Text)+Val(TextBox9.Text)+Val(TextBox10.Text)+Val(TextBox11.Text)+Val(TextBox12.Text)TextBox13.Text=Format(Val(TextBox7.Text)/Val(TextBox21.Text)*100,"0.00")TextBox14.Text=Format(Val(TextBox8.Text)/Val(TextBox21.Text)*100,"0.00")TextBox15.Text=Format(Val(TextBox9.Text)/Val(TextBox21.Text)*100,"0.00")TextBox16.Text=Format(Val(TextBox10.Text)/Val(TextBox21.Text)*100,"0.00")TextBox17.Text=Format(Val(TextBox11.Text)/Val(TextBox21.Text)*100,"0.00")TextBox18.Text=Format(Val(TextBox12.Text)/Val(TextBox21.Text)*100,"0.00")TextBox22.Text=100TextBox23.Text=Format(100*Q效?ì/(B*Val(Form4.TextBox12.Text)),"0.00")TextBox24.Text=B*Val(Form4.TextBox12.Text)/Val(Form3.TextBox1.Text)TextBox26.Enabled=FalseTextBox27.Enabled=FalseTextBox28.Enabled=FalseTextBox29.Enabled=FalseEndSub5換熱器計算PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimV煙¨?!,t煙¨?!,i煙¨?1!,Δ?èt!,α¨￠1!,α¨￠1輻¤?!,α¨￠1對?!,A!,B!,α¨￠2!,A1!,B1!,K!,F!,Z!,η?換?!,η?t!,η?回?!,η?節(jié)¨2!TextBox1.Enabled=FalseTextBox2.Enabled=FalseTextBox11.Enabled=FalseTextBox12.Enabled=FalseTextBox13.Enabled=FalseTextBox14.Enabled=FalseTextBox15.Enabled=FalseV煙¨?=0.7*Val(Form4.TextBox16.Text)*Val(Form7.TextBox25.Text)*1.1t煙¨?=Val(TextBox11.Text)i煙¨?1=Val(Form19.TextBox3.Text)-Val(Form4.TextBox14.Text)*Val(Form7.TextBox25.Text)*(Val(TextBox13.Text)-Val(TextBox12.Text))/(V煙¨?*0.9)TextBox14.Text=i煙¨?1Δ?èt=((t煙¨?-Val(Form3.TextBox5.Tex