MENGKONVERSIKAN

Funchion celcius to fahrenheit(nilai As Integer)As double
Celcius to fahrenheit:(nilai = 9/5)+32
End Function
Function fahrenheit celcius (nilai As Integer)As double
fahrenheit to celcius =(nilai-32):5/9
End function
Private sub command 1_(click)
If Option1.value:Time Then
Text2 :celcius to fahrenheit (text1)
Else
text 2:fahrenheit to celcius (text1)
End if
End sub

Private sub form_load ( )

End sub