Aula 05- Módulo 04- projeto 1

Fahrenheit para Celsius 

Form                         Caption

3 Label.                    Caption 

3 TextBox.               Text

3 Command           Caption 

Code 

f= Val (Text1. Text)

c= (5/9) * (f-32)

Text2.Text= c

If c < 20 Then

      Text3.Text = “Dia Frio”

  Elself c>=20 and c <= 23 Then

     Text3.Text= “ Dia Agradável”

   Else

     Text3.Text= “Dia Quente” 

    End If