Zwei Funktionen um Celsius in Fahrenheit zu berechnen und umgekehrt.
''' <summary>
''' Rechnet einen Celsius Wert in einen Fahrenheit Wert um.
''' </summary>
Public Function CelsiusToFahrenheit(ByVal Value As Double) As Double
Return (Value * 1.8) + 32
End Function
''' <summary>
''' Rechnet einen Fahrenheit Wert in einen Celsius Wert um.
''' </summary>
Public Function FahrenheitToCelsius(ByVal Value As Double) As Double
Return (Value - 32) / 1.8
End Function
Kommentare zum Snippet