二氧化碳物性计算-VBA模板-源代码 Dim rou, T As Double rou = 407.828 T = 800 Debug.Print "CO2_rouT_P="; CO2_rouT_P(rou, T) Debug.Print "CO2_rouT_S="; CO2_rouT_S(rou, T) Debug.Print "CO2_rouT_U="; CO2_rouT_U(rou, T) Debug.Print "CO2_rouT_Cv="; CO2_rouT_Cv(rou, T) Debug.Print "CO2_rouT_H="; CO2_rouT_H(rou, T) 'Debug.Print "CO2_rouT_Cp="; CO2_rouT_Cp(rou, T) Debug.Print "CO2_rouT_Yita="; CO2_rouT_Yita(rou, T)

可以计算氢气（气体）在不同温度和压力下的压缩因子和密度。 计算方便。 压缩因子Z，Z=Z(P,T) 密度rou,rou=rou(P,T) 计算准确，计算范围宽。

氩气物性计算小软件 1.采用国际单位制。 2.可以计算不同密度不同温度下的：压力P，熵S，内能U，定容比热容Cv，焓H，定压比热容Cp。 3.可以计算不同温度下的饱和液体密度。 4.可以计算不同温度下的饱和蒸汽密度。

超临界二氧化碳物性计算小软件-1996-Span版 根据德国Mr R.Span 1996年文献编写而成。取二阶导数数值化后前34项，精度有保证。

超临界二氧化碳物性计算小软件 窗体文件，可以加载到Excel VBA里，使用方便

rou,密度，kg/m3 T,开式温度,K 压力，MPa, P = rouT_P(rou, T) 内能，kJ/kg, U = rouT_U(rou, T) 焓，kJ/kg, H = rouT_H(rou, T) 熵，kJ/kg.K S = rouT_S(rou, T) VBA模板，可以加载到Excel VBA中，在Excel单元格中直接调用，使用方便。

超临界二氧化碳物性计算-粘性计算小软件 1998年版计算规则。

VB源代码：GBT17747.3-2011天然气压缩因子的计算第3部分_用物性值进行计算标准 可以直接在Excel VBA-开发工具-Visual Basic开发界面里应用。

天然气压缩因子计算-用物性值计算 根据GB17747.3-2011进行编程. GB17747.3-2011 天然气压缩因子的计算 第3部分：用物性值进行计算 Natural gas-Calculation of Compression factor-Part 3: Calculation using physical properties. 也是参考这个标准进行编程的。 ISO 12213-3 Natural gas-Calculation of Compression factor-Part3:Calculation using physical Properties.

天然气压缩因子计算程序-按物性值-GB17747.3-Excel版本 打开VBA代码编辑窗口就能看到