露點溫度 dewPoint 計算

Private Function DewPoint_1(byval T as double ,byval H as double ) as double

  DewPoint_1 = ((H/100) ^ (1/8) ) * ( 112 + (0.9 * T)) + 0.1 * T -112

End Sub

'

There is an easier formula for Dew Point Temp (measured in degrees C) -

Using your example 17.06 degrees C and 31% RH

=((31/100)^(1/8))*(112+(0.9*17.06))+0.1*17.06-112

Result -0.28384 celsius

簡易近似法

當知道乾球溫度、而相對濕度大於50%時，露點可以用下列的公式求得，其誤差值僅為 ±1℃。

Private Function DewPoint_2(byval T as double ,byval H as double ) as double

    DewPoint_2 = T- ( (100-RH) / 5 )

End Sub

露點計算[編輯]

知道相對濕度以及實際氣溫時，露點可以透過以下公式求得近似值：

當中的則是：

溫度  和露點  單位為攝氏、相對濕度  為百分比， 則代表自然對數。常數  和分別是：

℃

此公式是基於 Magnus-Tetens 近似法（ Magnus-Tetens Approximation），當中把飽和水氣壓視為溫度的函數。^[2]此方法僅在以下範圍時有效：

0℃ <  < 60℃

1% <  < 100%

0℃ <  < 50℃

‘ln的底數為e=2.718281...其實ln就等於log e

Private Function DewPoint_3(byval T as double ,byval H as double ) as double

   Dim r_T_RH as double

   r_T_RH =   17.27 * T / ( 237.7 + T)  + ln(H/100)

   DewPoint_3 =( 237.7 * r_T_RH ) / ( 17.27 -  r_T_RH )   

End Sub