Converts celsius to Fahrenheit
Converts celsius to Fahrenheit
Rate Converts celsius to Fahrenheit
(1(1 Vote))
picTempC.Cls
picTempC.Print FtoC(Val(txtTempF.Text))
End Sub
Private Funtion FtoC(t As Single) As Single
'Converts Fahrenheit to Celsius
FtoC = (5/9)*(t-32)
End Function
Converts celsius to Fahrenheit Comments
No comments yet — be the first to post one!
Post a Comment