固体燃料理论燃烧温度计算2017

《固体燃料理论燃烧温度计算2017》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、固体燃料理论燃烧温度计算程序一、固体燃料理论燃烧温度计算的数学方法理论燃烧温度计算公式：其中，为燃料的低位发热量；为空气带入的物理热；为燃料带入的物理热；为燃烧产物中某些气体在高温下热分解反应消耗的热量；为理论燃烧产物生成量；为产物的平均比热；为实际空气消耗量；为理论空气需要量；为空气的比热。燃料低位发热量计算公式：空气带入物理热计算公式：实际空气消耗量计算公式：其中，g为1立方米干气体中水分含量。燃料带入的物理热计算公式：理论燃烧产物生成量计算公式：分解热：其中，、分别为二氧化碳和水的分解度，、分别为燃烧产物中未分解的二氧化碳和水的体积。由于分解的二氧化碳和

2、水很少，故、按完全燃烧产物计算：二、固体理论燃烧温度计算程序图1程序界面OptionExplicitPrivateSubcmdExit_Click()EndEndSubPrivateSubcmdJisuan_Click()DimsQdAsSingleDimsCAsSingleDimsHAsSingleDimsOAsSingleDimsSAsSingleDimsNAsSingleDimsWAsSinglesC=txtC.TextsH=txtH.TextsO=txtO.TextsS=txtS.TextsN=txtN.TextsW=txtW.TextsQd=4.18

3、7*(81*sC+246*sH-26*sO+26*sS-5*sW)DimsQkAsSingleDimsLnAsSingleDimsTkAsSingleDimsCkAsSingleDimsGAsSingleDimsL0AsSingleDimsNnAsSinglesN=txtAirxs.TextsG=txtAirwater.TextsL0=0.01*(8.89*sC+26.67*sH+3.33*sS+3.33*sO)sLn=sNn*sL0*(1+0.00124*sG)IftxtZrairtem.Text>=0AndtxtZrairtem.Text<=400Then

4、sCk=1.3ElseIftxtZrairtem.Text>400AndtxtZrairtem.Text<=700ThensCk=1.34ElseIftxtZrairtem.Text>700AndtxtZrairtem.Text<=1000ThensCk=1.38ElseIftxtZrairtem.Text>1000AndtxtZrairtem.Text<=1200ThensCk=1.42ElseIftxtZrairtem.Text>1200AndtxtZrairtem.Text<=1800ThensCk=1.47ElseIftxtZrairtem.Text>

5、1800AndtxtZrairtem.Text<=2100ThensCk=1.51EndIfsQk=sLn*sCk*sTkDimsCrAsSingleDimsTrAsSingleDimsQrAsSinglesCr=txtRlbr.TextsTr=txtRltem.TextsQr=sCr*sTrDimsQfAsSingleDimsVco2AsSingleDimsVh2oAsSingleDimsFco2AsSingleDimsFh2oAsSinglesFco2=txtCo2f.TextsFh2o=txtH2of.TextsVco2=0.224*sC/12sVh2o

6、=0.224*(0.5*sH+sW/18)+0.00124*sG*sLnsQf=12600*sFco2*sVco2+10500*sFh2o*sVh2oDimsV0AsSinglesV0=0.244*(sC/12+sS/32+sH/2+sW/18+sN/28)+0.79*sL0DimsCcAsSingleDimsCkcAsSingleIfcmbRlzl.ListIndex=0OrcmbRlzl.ListIndex=1ThenIfcmbLlrstem.ListIndex=0ThensCc=1.38sCkc=1.3ElseIfcmbLlrstem.ListIndex

7、=1ThensCc=1.42sCkc=1.3ElseIfcmbLlrstem.ListIndex=2ThensCc=1.47sCkc=1.34ElseIfcmbLlrstem.ListIndex=3ThensCc=1.51sCkc=1.38ElseIfcmbLlrstem.ListIndex=4ThensCc=1.55sCkc=1.42ElseIfcmbLlrstem.ListIndex=5ThensCc=1.59sCkc=1.47ElseIfcmbLlrstem.ListIndex=6ThensCc=1.63sCkc=1.47ElseIfcmbLlrstem

8、.ListIndex=7ThensCc