Gnielinski公式的计算公式如下图所示,在excel中采用常规的计算方法,计算Gnielinski公式有点不方便,如果采用该代码可以直接简化excel中的操作,非常实用,而且也不容易出错,希望对大家有用。最后真诚地希望广大网友对该软件提出合理的建议,在此站长将对你的建议和意见表示衷心的感谢。
如你有其他需求或对软件有什么建议的话,可以随时联系渝石网络站长,站长将及时地给予回答。同时你也可以在网站下载其相关资料,网站地址:http://www.fishsting.cn/。
Public Function 烟气冲刷管束Nu数(雷诺数re, 普朗特数pr,长度ps, 管子直径d)
ps = 长度ps
d = 管子直径d
re=雷诺数re
pr=普朗特数pr
fk = (1.8 * Log(re) / Log(10) - 1.5) ^ -2
Nuf = (fk / 8) * (re - 1000) * pr
Nuf = Nuf / (1 + 12.7 * (fk / 8) ^ 0.5 * ((pr) ^ (2 / 3) - 1))
Nuf = Nuf * (1 + (d / ps) ^ (2 / 3))
烟气冲刷管束Nu数 = Nuf
End Function