DegreeC2F + DegreeF2C

Convert Celsius to Fahrenheit and Fahrenheit to Celsius degrees

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

CDegree
Or
FDegree

Views 480 Downloads 144

'Convert', 'replace', 'calculation', 'math', 'degree', 'hot', 'cold'

ANmarAmdeen
324
Math Classic ASP
Revisions

v1.0