Function DegreeC2F(CDegree)
DegreeC2F= CelsiusToFahrenheit(CDegree)
End Function
Function DegreeF2C(FDegree)
DegreeF2C = FahrenheitToCelsius(FDegree)
End Function
Function CelsiusToFahrenheit(DegVal)
' convert from Celsius to Fahrenheit degrees
CelsiusToFahrenheit = DegVal * 1.8 + 32
End Function
Function FahrenheitToCelsius(DegVal)
' convert from Fahrenheit to Celsius degrees
FahrenheitToCelsius = (DegVal - 32) / 1.8
End Function
DegreeC2F= CelsiusToFahrenheit(CDegree)
End Function
Function DegreeF2C(FDegree)
DegreeF2C = FahrenheitToCelsius(FDegree)
End Function
Function CelsiusToFahrenheit(DegVal)
' convert from Celsius to Fahrenheit degrees
CelsiusToFahrenheit = DegVal * 1.8 + 32
End Function
Function FahrenheitToCelsius(DegVal)
' convert from Fahrenheit to Celsius degrees
FahrenheitToCelsius = (DegVal - 32) / 1.8
End Function
CDegree
Or
FDegree
Or
FDegree
Views 4,184
Downloads 1,296
CodeID
DB ID
ANmarAmdeen
610
Revisions
v1.0
Tuesday
July
3
2018