风冷翅片冷凝器自动计算软件(VBA编程)

合集下载

强迫风冷散热器计算工具

膨胀系数℃-1β*10^6
动力黏度Pa.s μ*10^6
40 1.013 1.128 1005 16.96 0.699 2.76
3.19
19.1
45 1.013 1.110 1005 17.46 0.699 2.80
3.15
19.4
50 1.013 1.093 1005 17.95 0.698 2.83
40 45 1.013 1.128 1005 16.96 0.699

3.19 19.1
风机参数进出风口空气△t 计算风量 [m3/min.] 计算风量 [CFM] 风机风量 [m3/min.] 风机风量 [CFM] 风机静压 [Inch.H2O] 风机风量q1 [m3/min.]
风机静压P1 [Pa]
10 45.94 1623 46.38 1638 4.02 46.38
0
42 120 1001
31.5
0.773 -27.4 1270.7
0.0
20.23 714 0.337 2.88 717 13.7
层流/紊流选择需进行规划求解需输入参数
空气参数全管长平均温度Tf ℃ 气压100kpa 空气密度ρ kg/m3 比热容J/(kg.k) 运动粘度m2/s ν*10^6 普朗特数Pr 导热系数W/m.℃ λ*10^2
Nf
导热系数W/m.℃ λ de [m] 导热侧面积A1 [m^2] 对流换热面积A2 [m^2] 翅间面积A2 [m^2] 翅片面积A2 [m^2] 通风面积A0 [m^2]
521 300 78 63 15
1 3
131
208 0.0057
0.16
5.11
0.12 4.99 0.02

计算风冷冷凝器蒸发器计算

计算风冷冷凝器蒸发器计算
风冷冷凝器是一种常见的冷却设备，被广泛应用于空调、冷冻机组、制冷设备等领域。

下面将详细介绍风冷冷凝器的计算方法。

1.计算风冷冷凝器的热负荷：
热负荷是指在一定时间内，待冷却物质从其中一温度降低到另一温度所需要吸收的热量。

计算风冷冷凝器的热负荷需要考虑以下几个因素：-待冷却物质的初温和终温
-待冷却物质的质量或流量
-待冷却物质的比热容
热负荷=待冷却物质的质量/流量*待冷却物质的比热容*(终温-初温)
2.计算风冷冷凝器的冷却水需要量：
将热负荷转化为冷却水需要量时，需要考虑待冷却物质的温度变化速率，以及风冷冷凝器的传热效率。

冷却水需要量=热负荷/(待冷却物质的温度变化速率*传热效率)
3.计算风冷冷凝器的湿球温度及风速：
湿球温度和风速是影响风冷冷凝器传热效果的重要参数。

可以通过实验或模拟计算来确定最佳的湿球温度和风速。

4.计算风冷冷凝器的面积：
风冷冷凝器的传热面积是决定其传热效果的重要因素。

可以通过以下公式计算风冷冷凝器的面积：
面积=热负荷/(传热系数*温差)
其中，传热系数可以根据风冷冷凝器的类型和设计参数进行估算，温差取冷却水进出口温差。

5.计算风冷冷凝器的风量及排风面积：
风冷冷凝器的风量是指通过风扇传输的空气流量，可以通过以下公式计算：
风量=面积*风速
排风面积可以根据风量和风速来计算，具体方法可以根据实际情况采用不同的计算模型。

基于MATLAB的风冷式翅片管冷凝器的仿真模拟

基于MATLAB的风冷式翅片管冷凝器的仿真模拟孙建新南晓红（西安建筑科技大学环境市政工程学院西安 710055）摘要：本文利用分布稳态参数法建立了翅片管换热器的数学模型，并用MATLAB语言编制了关于翅片管冷凝器的仿真程序，通过试验数据验证了程序的可靠性，并利用仿真程序分析不同进口风速和冷凝压力下冷凝换热量的变化情况并分析了不同冷凝压力下过冷区的变化。

关键词：翅片管冷凝器分布参数法仿真 MATLAB语言Using MATLAB in Modeling and Simulation of Finned-Tube CondenserSun Jianxin Nan XiaohongAbstract Distributed-parameter method is used to set up a simulation model for a finned-tube condenser. With the help of MATLAB programmable language, the st able state numeric model of the finned-tube is built. Compare the calculated re sults with experimented results show that the model is reliable and it can be u sed analyze the performance of the finned-tube condenser. Using the calculated results analyze the change of heat exchange in the different velocity of air an d condensation pressure. And analyze the change of the length of super-cooling in the different condensation pressure.Key words Finned-Tube condenser, Distributed-parameter method, simula tion, MATLAB programmable language1引言近年来我国国民经济飞速发展，制冷空调业也得到了快速发展。

冷凝器计算模拟软件

A热流介质T1=64.0→T2=####B冷流介质t1=30.0→T2=####A蒸汽流量W=800.0A蒸汽蒸汽潜热r=1100.0A的比热容C= 2.5水的比热容 4.2循环水用量Y=选取总传热系数K=500.0需换热面积S=m m/s kg/m3j/kg.℃kj/kg kj/kg.℃kj/kg.℃w/m2.℃二、选择换热器型号一、换热器换热面积初算对数平均温差△tm=kg/h 冷凝器热负荷Q=三、换热器传热系数核算1、管内传热系数ai核算管内流速u= 1.0管内水的黏度μ=（30℃-40℃）0.000727选取换热器的内径di=0.02流体密度p=1000.0水的比热容4200.0管内换热系数ai=w/m.℃kj/kg w/m.℃取4到8m kg/m3mPa.s管内水的热导系数λ=（30℃-40℃）0.62.壳程传热系数ao的核算（壳程流体为蒸汽，工业多为膜状冷凝）A热流蒸汽的冷凝热1100.0A在冷凝温度液态热导系数λ=0.2当管内流立式冷凝器壳程的传热系数ao=冷凝液密度р790.0液化温度的黏度Ч0.35重力加速度g 9.8饱和蒸汽温度与壳壁温度差⊿t5.03.总传热系数K的核算循环水阻垢系数Rsi=0.00034传热管长度L 3.0换热器总传热系数核算Ko=A热流蒸汽的阻垢系数Rso=0.00017换热管外径do 25.0换热管外径di20.027510.3大于10000为湍流w/m2.℃1543.91687.8w/m2.℃500.7w/m2.℃。

冷凝式换热器热力计算软件使用说明

一、概述
(一) 计算标准方法及参考文献
本程序设计主要依据及参考手册如下
(冷凝式)换热器热力计算软件
《锅炉机组热力计算-标准方法》(57 标准)上海工业锅炉研究所编印《锅炉机组热力计算-标准方法》(73 标准)上海工业锅炉研究所编印《工业锅炉设计计算方法》(03 标准)中国高效工业锅炉项目办公室委托
(冷凝式)换热器热力计算软件
热力计算； 4. 适用多种传热元件：可供选择的传热元件有光管管束、鳍片管管束、膜式
管管束、圆形肋片管管束、方形肋片管管束、螺旋横肋管管束、双 H 型鳍片管管束、单 H 型鳍片管管束等； 5. 适用各种燃料：固体燃料、气体燃料、液体燃料及这三种燃料组成的混合燃料；在缺少燃料参数的情况下可依据烟气成分进行计算； 6. 设置了材质库：用户可以选择其中的材质参数对换热器进行材质设计，也可以使用软件的开放接口自行添加新材质或删除旧材质。对于膜式管管束、鳍片管管束、圆形或方形肋片管管束、螺旋横肋管管束和 H 型鳍片管管束，管子和扩展受热面可设计成不同材质； 7. 阻力特性计算：可进行换热器本体烟气侧或空气侧的烟风阻力计算，可进行换热器本体水侧阻力计算； 8. 优化横向节距：给定换热器烟气侧的流速范围，可快速的优化得到符合给定烟气流速的横向节距； 9. 输出详细的热力计算书； 10. 健壮性：软件具有错误判别功能，对用户输入的数据进行正确性和完整性校验。
(冷凝式)换热器热力计算软件
目录
(冷凝式)换热器热力计算软件 ........................................................................................................ 1 前言 .................................................................................................................................................. 2 一、概述................................................................................................................................... 3

电机用冷却器翅片侧空气热力过程的三维数值模拟计算及分析

Vol.29 No.3 2009.3船电技术 2009年第3期49电机用冷却器翅片侧空气热力过程的三维数值模拟计算及分析邱兆义程双胜（中国船舶重工集团公司第七一二研究所，武汉 430064）摘要：本文利用FLUENT 模拟了管排数为四的电机冷却器波纹翅片表面空气流动和传热过程、表面温度和压降分布情况，分析了翅片入口风速对翅片表面的温度、空气压降、换热系数的影响，对内部的热交换过程有一个比较清晰直观的模拟计算及分析，从而为合理选择风速和翅片的结构优化提供一定的理论基础。

关键词：FLUENT 冷却器温度场换热系数中图分类号：TM311 TK172 文献标识码：A 文章编号：1003-4862 (2009) 03-0049-043D-Simulation of Thermal Process on the Tin of theCooling Device Using in the Electrical MotorQiu Zhaoyi, Cheng Shuangsheng（Wuhan Marine Electric Propulsion Research Institute, CSIC , Wuhan 430064, China ）Abstract ：In this article, it simulates the thermal process of the surface of the moire tin of the cooling device with four row pipes using software FLUENT and get some typical contour charts of the surface temperature and pressure, analyzes the effect of velocity of inlet on the surface temperature and pressure, heat transfer Coef, and get a intuitionistic and clear cognition. It can provide academic basis for the ascertaining the air velocity of inlet and the optimization of the structure of the tin Keywords ： FLUENT ；cooling device ；t emperature field ；heat transfer Coef1 概述近年来，由于大功率电机不断出现，电机冷却器的应用越来越普遍，而穿片式电机冷却器由于具有换热面积大、散热性能好、紧凑性好及加工方便等许多独特优点，因而在电机及电力行业得到广泛应用。

EVAP-COND软件中文使用说明

EVAP-COND软件应用手册一.编制目的：对EVAP-COND软件进行详细应用介绍，使研发工程师学会使用该软件，在设计初期预估换热器的性能。

二.简介及用途1. 简介EVAP-COND是一个软件包，包含NIST的翅片管蒸发器和冷凝器的仿真模型。

EVAP-COND 的帮助菜单中提供了有关程序的功能和如何使用它的信息。

这些指令包括准备输入数据，执行程序，并检查模拟结果。

2.用途：管的管或管截面模拟一维的，非均匀的气流分布制冷剂分布的模拟制冷剂回路的优化冷凝器模型能够模拟临界点以上REFPROP8制冷剂性能11制冷剂和混合制冷剂：R22，R32，R134A，R290，R404A，R407C，R410A，R507A，R600A，R717，R744三.详细说明1.软件界面软件安装后的初始界面。

注：软件关闭后重启时，可能会重新安装一次，需保证安装文件在第一次安装时的目录。

2. 选择制冷剂点击点击图中圆圈所示位置，或选择菜单栏中“Edit—>Refrigerant Selection”选项，弹出制冷剂选择页面，选择合适的制冷剂。

3.换热器设计点击图中圆圈所示位置，或选择菜单栏中“Edit—>Coil Design”选项，弹出换热器设计对话框，输入换热器的各项参数。

将换热器参数输入完整之后，点击确定，弹出管路布置界面。

对于蒸发器而言，图示上部位制冷剂进口，下部为制冷剂出口，管路布置时从上往下布置，冷凝器相反。

将鼠标放到图中所示管路上，拖动至相邻的管上，即可完成管路排布，以G96E1000蒸发器为例，布置完成后如下图所示。

若想去除某段管路，双击这段管路的两端即可去除。

最多可算5排换热器，总共最多可算130根换热管，即最多5排26列公制、英制单位，默认公制铜管类型，可选光管和内螺纹管，我公司用内螺纹管翅片类型，可选平片、波纹片、开缝片和百叶窗片，我公司用平片风量和风机功率4.修正系数点击图中圆圈所示位置，或选择菜单栏中“Edit —>Correction Parameters ”选项，弹出修正系数对话框，可输入换热器的修正系数，一般默认为1不变。

翅片式冷凝器工艺计算

DWR28S (内螺纹管φ7) 计算数据 2.904564315 1 3.086268729 3.615 2.086268729 1.12696283 1.394436991 0.010516651 0.822987831 2.277293852 0.439117683 0.676692815 0.822239151 0.8316822
tc ΔTc t1 tai tao Q0'(tc=52,te=7.2,ΔTc=5,ΔTe=8) P(tc=52,te=7.2,ΔTc=5,ΔTe=8) Q0=Qo'*95%*98% h0 h3=f(tc,ΔTc) q0=h0-h3 h2' qk=h2'-h3 C1=qk/q0 Qk=C1*Q0 或Qk=P+Q0
DWR28S (R134a) 计算数据 2.605128205 1 2.768100424 4.875 1.768100424 1.018161318 1.356356461 0.0116911 0.859040319 2.3608939 0.423568378 0.69576289 0.809930425 0.819550444
单位 m3/h m2/s m/s mm mm mm mm mm mm
代号
Va=3600Qk/{ρa*Cpa*(tao-tai)}
vf Wf d δ δf Sf S1 S2 π db di=d-2*δ db
2
0.0000175 2.53 7 0.3 0.115 2 21 18.2 3.142 7.23 6.4 52.2729 0.276625173 13.77 1.885 0.021410452 0.341139637 0.0201088
Sf/db（要求=0.18~0.35） s1-db sf-δf fb=π*db*(1-δf/Sf)/1000 ff=2*(S1*S2-π*db2/4)/Sf/1000 fi=πdi/1000

表冷器计算的软件实现与应用

表冷器计算的软件实现与应用摘要：表冷器作为空气处理的主要产品，其应用范围非常广泛，但由于其表面热质交换的复杂性，至今未有比较统一的计算方法。

各个厂家只测得在特定的几何尺寸下的一些传热系数的关联式，但是使用非常受限制。

本文通过计算管内管外的换热系数，得出以外表面积为基准的传热系数的方法计算表冷器，并实现软件计算，结合公司的CNAS认证实验室测试数据加以修正，使软件使用范围广，计算准确。

关键词：VB6.0 MATLAB 7.0风侧换热系数水侧换热系数冷却效率1、引言表冷器作为空气处理的主要产品，其应用范围非常广泛。

根据工作的需要笔者制作了此表冷器的计算程序，通过计算管内管外的换热系数，得出以外表面积为基准的传热系数的方法计算表冷器，并结合公司的实验室测试数据加以修正，使软件更具有实用性。

下面先介绍软件基本情况和使用方法，然后通过实例来进行软件的实际应用。

2、表冷器的软件计算方法介绍1）、计算表冷器的几何参数（包括肋化系数、肋通系数、净面比、外表面积、内表面积等）；2）、计算表冷器的冷却效率，求出风的焓值，采用数学软件matlab7.0拟合焓值与温度的多项式函数，计算湿球温度，再利用与饱和点热湿比相等计算出风干球温度和相对湿度；3）、求解风侧当量换热系数和水侧换热系数，进而求的以外表面积为基准的传热系数；4）、求解对数平均温差；5）、计算风侧换热量。

3、软件设计的主要公式介绍：肋化系数：τ=A/Ai [1] （1）肋通系数：a=A/fa[1] （2）净面比：ε=(S1-d0)(e-δf)/S1e [1]（3）空气侧对流换热系数：aa=1.1C1C2(λ/de)(L/de)nRem[1]（4）冷却效率1：η=1-exp(-aa a N/ CpρVa) [1]（5）冷却效率2：η=( h1- h2)/( h1- hs) [1] （6）水侧换热系数：aw=(1430+22t)Vw0.8/di0.2[1]（7）式中：A—每米管长总外表面积，㎡；Ai—每米管长内表面积，㎡；S1—管中心距，m；d0—基管外径，m；h1、h2、hs—空气进出口焓，kJ/kg ；aa—空气侧对流换热系数w/ ㎡k ；Va—迎面风速，m/s ；N—排数；Cp—空气定压比热容，kJ/kg℃；ρ—空气密度，kg/m³ ；Re —雷诺数；Vw—水流速，m/s；di—管内径，m;λ—导热系数，w/m k；L —沿气流方向肋片长度，m；e —翅片间距，m；δf —翅片厚度，m。

冷却循环水计算软件大全

冷却循环水计算软件大全冷却循环水计算软件是工程领域中的一种常用工具，用于计算和优化冷却循环水系统的设计和运行参数。

这些软件可以根据用户提供的输入数据，通过数值计算和模拟技术，得出系统的各种参数和特性，帮助用户实现能耗节约和系统优化的目标。

下面是一些常用的冷却循环水计算软件。

1. HTRI Xchanger Suite：HTRI Xchanger Suite是一款专业的热交换器设计和性能计算软件，可以用于计算冷却循环水系统中的热交换器的性能参数，如传热系数、压降等。

该软件提供了多种计算模型和方法，适用于不同类型和结构的热交换器。

2. EES (Engineering Equation Solver)：EES是一款通用的工程计算软件，可以用于求解各种工程问题，包括冷却循环水系统的计算。

它提供了丰富的物性数据库和数值计算功能，用户可以根据自己的需求设置系统的输入参数，计算出流体的温度、压力、流量等参数。

3. PipeFlow Expert：PipeFlow Expert是一款专业的管道流动和压力损失计算软件，可以用于在冷却循环水系统中计算管道的流量、速度和压力损失等参数。

它提供了多种管道材料和流体模型，可以根据用户输入的管道尺寸、材料和流体性质，计算出系统的流动特性。

4. Cooling Tower Analysis Software：这是一款专门用于冷却塔系统设计和分析的软件，可以用于计算冷却塔的传热和湿空气混合特性，并分析系统的运行参数和能耗。

该软件提供了多种模拟算法和清晰的结果展示，用户可以通过调整系统的设计参数，达到最佳的冷却效果。

5. Aspen HYSYS：Aspen HYSYS是一款多功能的工艺模拟和计算软件，可以用于模拟和优化各种工艺系统，包括冷却循环水系统。

用户可以通过该软件建立系统的流程图和物质平衡模型，通过优化操作变量，获得最佳的系统性能和能耗。

6.TRACE700：TRACE700是一款专门用于建筑能源分析和模拟的软件，可以用于计算和优化大型建筑物的冷却循环水系统。

风冷冷凝器计算(无密码)

N3= n= L= de= Fy= Fz= F“z= v v
14.47 8.00 64.95 3.37 0.96480 57.20984 57.20984 1.65041 2.87815 314.84529 318.24611 43.78314
输入
规划确认
计算值应为整数与D70一致
必须满足校核值 1.0-2.0
吸汽管流速（m/s）
冷凝温度℃ 蒸发温度℃ 过热度℃ 过冷度℃ 室外环境干球温度℃ 室外环境湿球温度℃ 吸入点焓（KJ/Kg）吸入点密度（Kg/m3）冷凝后的密度（Kg/m3）冷凝后的焓（KJ/Kg）单位质冷量时质量流量（Kg）质量流量（Kg/s）液管流速（m/s）
吸汽管流速（m/s）
冷凝温度℃ 蒸发温度℃ 过热度℃ 过冷度℃ 室外环境干球温度℃ 室外环境湿球温度℃ 吸入点焓（KJ/Kg）吸入点密度（Kg/m3）
室外环境干球温度℃
tw= 35.00000
输入
室外环境湿球温度℃
tws= 24.00000
冷凝温度℃
tk= 50.00000
输入Leabharlann 蒸发温度℃to= 5.00000
过热度℃
tr= 8.00000
过冷度℃
tg= 5.00000
传热温差℃
△tm= 9.10239
冷凝空气进风温度℃
t1= 35.00000
输入
ρ3= 1008.89330
冷凝后的焓（KJ/Kg）
h2= 256.40000
单位质冷量时质量流量（Kg）
mo" 0.00664
质量流量（Kg/s）液管流速（m/s）
吸汽管流速（m/s）
m0= 0.04371 v1= 0.48208

冷箱结构分析中Excel VBA技术的应用

ｗｏｒｈａｎｅｄｉｅｏｒｃｍｅｅｅｓｓｎｅｔｏｌｓｕｌｈａｋｔｔｏｄｂｆｅｂｅｏｓｕｓｌｓｉｃｈｅｍｄｅｈｏｄｂｅｃｎｇｅ．ＷｉｈｈｅｐｒｇｒｍｅｈｑｕｄｔｔｏａｔｃｎｉｅｏｆＥｘｃｌｅＶＢＡ，ｈｅｆｌｎ ” ｅｔｉｅｉ．ｔｘｔ ” ｆｍａａｔｗｈｉｈｃｌｍｐｎｔｔｉｔｌｍｅｎａ／ｉｏｔｒｒｃｌ．ｏｒｔｃｎｂｅｇｏ，ｃｏｕｄｉｕｔｉｏｈｅｆｎｉｅｅｅｎｔａ！ｓｓｆｗａｅｄｉｅｔｙｙｓＡｎｈｉｉｅｃｎｏｒｒｔｏｆｗａｅｔｕｉｓｅｙｓｅｄｔｓｆｌａｄｅｈｅｓｔｒＯｂｌｈｅｇｅｔｙｍｄｅ，ｏａｈｅｍｄｅｔｐｂｔｐ．Ｉｔｓｐｅｎｈｉａｐｒ，
荷栽等分析过程。通过对某液态氮气、气、气储存装置（箱）结构设计，证该方法的可行性。实践证明，氩氧冷的验该方法可以在Ｅｃｌ序界面对有限元软件命令流文件进行便捷的生成和修改，大大节约进行结构分析所需的ｘｅ程可时间、高设计效率、证模型的准确性。提保
ｔａｙｉｏｄｌｃｕｌｏｆｅａｉｙｉｈｅＥｘｃｌｒｈｅａｎｌｓｓｍｅｏｄｂｅｍｄｉｉｄｅｓｌｎｔｅｐｏｇｒｍ，ｎｄｈｎｅａｅｔｗｎｐｉｅｕｐａｈｅａａｔｅｎｇｅｒｔｈｅｎｅｉｕｔｆｌｇｒｄｅｔｆｎｉｅｅｅｅｔｍｏｄ１ＴｈｅｒｓｔｏｉｍｈａｔｉｎｅｆｃｅｔｗａＯｄｅｌｗｉｈｔｎａｙｓｓｏｏｌ－ｘ．Ａｎｄｔｉｔｌｍｎｅ．ｅｕｌｓｃｎｆｒｔｔｉＳａｆｉｉｎｙｔａｔｈｅａｌｉｆｃｄｂｏｈｅａｃａｙｏｈｅｗｈｅｐｏｅｓｉｅｉｂｌ．ｃｕｒｃｆｔｏｌｒｃｓｓｒｌａｅ

收藏！翅片式蒸发器如何最简单的进行计算和仿真？？

收藏！翅片式蒸发器如何最简单的进行计算和仿真？？前言：翅片式换热器是制冷系统中最最常用的换热器之一，换热方式是强制式风冷换热器，尤其是家用空调中的蒸发器和冷凝器采用的都是翅片式换热器，而换热器其实又是制冷系统设计中最难的一部分，因为压缩机的匹配和节流阀的匹配可以采用选型软件来完成；而两器的设计需要一定的经验以及一定的计算，难度还是比较大的，我们就利用最简单的方法Excel来进行翅片式蒸发器的设计选型；在制冷系统的设计中，换热的设计是一件非常麻烦的事情，一大堆的计算公式让很多同行望而却步，最郁闷的就是按照这些公式来计算后，发现根本就是不对的或者肯定是跟实际有偏差的；所以很多同行最后都放弃了；也有不少计算软件，但是计算结果准确的肯定是收费的，免费的软件计算出来的还不如自己拿笔来计算，今天我们就简单给各位同行分项下笔者在实际设计中的方法。

笔者的设计一般按照40的传热系数来计算，因为一般的翅片是换热器在额定工况下基本上是这个数据，你按照教科书的算法，算到最后也差不多是这个数值了。

我们做如下关于翅片换热器的结构参数计算表格：我们假如有以下系统的蒸发器需要我们设计：环境工况为7/6℃时候，出风温度4℃/90%，设计一个制冷系统；要求:制冷剂为R22，冷凝温度50℃，过冷度5℃，蒸发温度-1℃，过热度7.9℃，制冷量约为11.5KW；我们选择压缩机为比泽尔4FES-5，，根据压缩机选型软件和系统设计需求，如下参数：我们来看看Excel的计算结果：这里有几个小细节我们讲解下，因为有了压缩机的实际运行功率，我们很容易计算出压缩机的等熵效率，本系统为66.91%，计算出来的排气温度为102.6℃，与压缩机选型软件计算出来的102.1℃偏差也不大。

空气侧的进风温度是7℃/6℃；出风为4℃/90%；蒸发器的换热量=压缩机的制冷量=11790W；有计算公式：Q=K*A*Tm；我们可以假定换热系数为40，我们能得到以下的计算表格：计算出来的换热面积为47.1867m2；通过调整管长、单排管数和排数，我们得到了上述的计算结果，分别为：管长度=1400mm;单排管数量=32排；排数=2；下面我们来利用NIST另外一个非常牛逼的神器：EVAP-COND；来做蒸发器的仿真计算；方法如下：选择制冷剂：R22；蒸发器结构参数的设定：制冷剂参数和空气侧参数的设定：简单的流路设计：风量参数的设计：点击仿真开始，得到如下的结果：得到的流量偏小，我们可以适当缩短单根换热管的长度来减少蒸发器的压力，来提高制冷剂的流量；换热管有1400调整到1100，得到如下的结果：我们查看仿真结果的很多数据：包括制冷剂的进出口温度和压力等数值，这个软件非常方便。

VBA编程实现燃气-蒸汽联合循环性能计算

口中显示的变量并不影响窗体的正常显示。 “ Ｄｉｍｒａ，ｒｇ，ｒｐ，Ｒｐａ，Ｒｐｇ，Ｂｉｌｌ，Ｃｐａ，ＴａＡｓＤｏｕｂｌｅ ” 这句代码的意思是定义双精度变量ｒａ，ｒｇ，ｒｐ，Ｒｐａ，Ｒｐｇ，ｎｎｌ，Ｃｐａ和ｒｒａ。
在ＶＢＡ中可以一次定义多个变量。
Ｔａ＝（Ｔ１－Ｔ４２）／２
Ｃｐａ＝１．０２Ｗｃ＝ＣｐａＴ１Ｒｐａ／ｎｍ
最后．应该注意的是：在ＶＢＡ中每句代码的结束不需要增加标点符号，在ＶＢＡ中能像在ＶＣ＋＋中那样每句代码结束都要加英语中分号。
ＨＲ：３６００，ｎｔｈＤｅｂｕｇ．Ｐｒｉｎｔ“ ＨＲ＝“ ：ＨＲ
单ｍ
；
蠢
奠ｌｌ ¨ 。ｌ
ｉ
：：：
— — 三 — 二 — 二■ —
莓ｊ
４蒸汽轮机计算
ＤｉｍＱａｖ，ｍｓ，ＷｓｔＡｓＤｏｕｂｌｅ
３程序计算结果
编制好程序之后，就可以运行程序了。在运行程序时可以
选择 “ 逐句读 ” 、 “ 运行到光标处 ”和 “ 运行子过程／用户窗
ｍｆ＝ｍａ（ＣｐｇＴＩＴ — ＣｐａＴ１（１＋Ｒｐｇ））／（ＬＨＶ＋

用VBA语言编写采暖系统计算程序

Ｇ１．６Ｑ／ｔｔ／：０８７（－ｈｃｇ）。（２１）（１１）
（）６
Ｌ＝１Ｖ２２。（ｏＰ／）
式中，一从每１Ｊｍ门、窗的缝隙进入室内的空气量，
● ● … … … … … … … … … … … … … … … … … … … … … … … … … ●
●
摘要：利用Ｅｃｌｘｅ表格和内置的ＶＡ语言编写采暖系统计算程序，对多层和高层建筑Ｂ：：
●
● ＿＿＿＿＿
：：
●
采暖热负荷和常见的采暖系统进行了计算。该程序计算简便，工作效率高。关键词：ＥｃｌＶＡ；热负荷计算；采暖系统计算ｘｅＢ；
（ｃ＋ｆＦ（一ｔ）１＋Ｉ）ｌｔｗ口（）２
１程序的编制依据
１．１参阅的资料程序的编制参阅了《采暖通风与空气调节设计规
＝
式中ｐ一修正后的耗热量，ｗ；
一
朝向修正率，％；
范》、供热工程》、实用供热空调设计手册》和《川《《地
ห้องสมุดไป่ตู้风渗透风量综合修正系数ｍ值。
１２主要计算公式．１２１热负荷计算公式．．
而存在着许多问题。例如：冷风渗透耗热量采用《采暖
通风与空气调节设计规范》的方法，但规范的计算方法存在一定问题；一般的采暖计算软件的程序的输入
方法不简洁，程序的适应性差，程序的适用范围不广，程序无输入、输出、存储功能，程序由软件公司编写，无
维普资讯
计算机应用与ＩＴ技术

基于VB的CATIA二次开发在板翅式换热器设计中的应用

河南科技Henan Science and Technology 信息技术总779期第九期2022年5月基于VB的CATIA二次开发在板翅式换热器设计中的应用徐振东王二强（新乡航空工业（集团）有限公司，河南新乡453049）摘要：针对板翅式换热器结构复杂、设计周期长的问题，本研究提出了一种结合CATIA软件进行二次开发板的翅式换热器参数化建模。

首先利用Microsoft Visual Basic开发工具自带的控件库对板翅式换热器计算求解的界面进行设计，其次根据板翅式换热器性能计算求解过程来编写程序代码，然后建立VB和CATIA的连接，对CATIA API进行调用和处理，最终实现板翅式换热器的热力计算、三维模型创建和计算结果的数据存储等功能。

试验结果表明，所开发的软件可实现不同系列板翅式换热器的快速设计，大幅降低技术人员的设计周期，提高设计效率。

关键词：板翅式换热器；CATIA；VB中图分类号：TK172；TP311.52文献标志码：A文章编号：1003-5168（2022）9-0019-05 DOI:10.19968/ki.hnkj.1003-5168.2022.09.003Application of Auxiliary Development Program for Plate-Fin HeatExchanger Based on CATIA and VBXU Zhendong WANG Erqiang(AVIC Xinxiang Aviation Industry(Group)Co.,Ltd.,Xinxiang453049,China)Abstract:Aiming at the problems of complex structure and long design period of plate-fin heat exchanger, this study proposesa parametric modeling of plate-fin heat exchanger combined with the secondary de⁃velopment of CATIA software was proposed.Firstly,the interface design of the calculation and solution of the plate-fin heat exchanger is carried out by using the control library that comes with the Microsoft Vi⁃sual Basic program development tool.Secondly,the program code is written according to the calculation and solution process of the plate-fin heat exchanger,then establish the connection between VB and CATIA to call and process the CATIA API.Finally,the functions of thermal calculation,3D model cre⁃ation and data storage of calculation results of plate-fin heat exchangers are realized.The results show that the developed software can realize the rapid design of different series of plate-fin heat exchangers, greatly reduce the design cycle of technicians,and improve the design efficiencyKeywords:plate-fin heat exchanger;CATIA;VB0引言板翅式换热器具有传热效率高、结构紧凑、可靠性高等优点，被广泛应用于航空航天领域。

翅片式冷凝器计算表

2523456789制冷量q0海拔高度h大气压力b空气相对湿度环境温度ta冷凝温度tc过冷温度tsc蒸发温度te10吸汽温度ts11冷凝压力pc12冷凝压力损失pc13蒸发压力pe14蒸发压力损失pe15点1焓值h116点2焓值h217点3焓值h318点4焓值h419点5焓值h520点6焓值h621点7焓值h722冷凝过热负荷qk123冷凝饱和负荷qk224冷凝过冷负荷qk325冷凝总负荷qk26蒸发器总负荷qe27制冷剂质量流量mr28冷凝总负荷qc29压缩机电机功率30进风温度tai31进出风温差ta32出风温度tao33进出风平均温度tam34水蒸汽分压力ps35干空气密度a36空气导热系数a37空气动力粘度a38空气运动粘度a39空气定压比热cpa4041铜管直径do42铜管壁厚p43铜导热系数cu44铝箔厚度f45铝箔导热系数f46管中心距s147管中心距s248片距e49每米管翅片外表面积ff2s1s24do2f2e50每米管翅片间的管表面do2f1fe51每米管长总外表面积ftfffb52每米管长平均直径处的dm1或fofilnfofi53每米管的内表面积fi54翅化系数55净面比56当量直径deg57六边形长对边距离l58六边形短对边距离b59翅片参数60翅片相当高度h61翅片参数m62翅片效率f63表面效率s6465空气流量va66迎气流方向排数nd按设计任务书按设计任务书101325100065h28829pakwm按标准工况干球35湿球24按标准工况干球35湿球24与ta有关与tc及冷凝条件有关与回风干球温度及换热型式有含蒸发器管道及汽分压缩查压焓图表01015pcmpampampampa查压焓图表003005pe查压焓图表15查压焓图表91查压焓图表50查压焓图表50查压焓图表47查压焓图表5查压焓图表10h2h3h3h4h4h5h2h5h1h5q0qekjkgkjkgkjkgkjkgkjkgkjkgkjkgkjkgkjkgkjkgkjkgkjkgkgskwkwqkmr1

翅片管式冷凝器计算软件

43 最窄截面风速 wmax
wmax=s1*sf*wy/（（s1-db）*（sf-δ f））
44 比值 b/de
45 雷诺数 Re
Re=wmax*de/υa
46 空气侧表面传热系数式中的系数 C 查表
47 空气侧表面传热系数式中的系数 ψ 查表
48 空气侧表面传热系数式中的指数 n 查表
49 空气侧表面传热系数式中的指数 m 查表
序号名称计算公式参数1制冷量q033002冷凝温度tk482003蒸发温度t0100004冷凝前温度tsh800005冷凝后温度tsi450006过冷度tk过冷度tktktsi32007蒸发前温度te100008蒸发后温度ti150009过热度t0过热度t0tit0500010回风温度ta13520011出风温度ta24420012空气平均温度tmtmta2ta123970013进出风温差tatata2ta1900014单位质量制热量qk冷凝前后焓差查压焓图18272015单位质量制冷量q0蒸发前后焓差查压焓图15345016翅片式冷凝器铜管外径d01000017翅片式冷凝器铜管壁厚0050018翅片式冷凝器铜管内径didid020900019翅片式冷凝器铝箔片厚f020020翅片式冷凝器铝箔片间距sf150021翅片式冷凝器迎风面上管中心距s12200022翅片式冷凝器侧面管间距s2s2312s121905323翅片式冷凝器翅片根部外沿直径dbdbd02f1040024每米管长翅片侧面面积afaf2s1s2db24sf044625每米管长翅片间管面面积ababdbsffsf002826每米管长翅片侧总面积aofaofafab047427每米管长管内面积aiaidi002828空气的比定压热容cpa根据tm查空气热物理性质表100500029空气的热导率a根据tm查空气热物理性质表002730空气的运动粘度a根据tm查空气热物理性质表0000016831空气的密度a根据tm查空气热物理性质表112832对数平均温差mmta2ta1lntkta1tkta2763633制冷剂质量流量qmqmq0q0002234冷凝负荷qkqmqkqkqmqk401935空气体积流量即风量qvqvqkacpata2ta1039436冷凝器迎面风速wy根据设计要求取180037冷凝器迎风面积ayayqvwy021938冷凝器迎风面宽度l即有效单管长根据机型取660000波纹翅片冷凝器设计计算说明