Exercício 5 ficha 3

Ambiente gráfico:

Agora vamos ao codigo:

Textboxs:
                 texbox para inserir o resultado:
                                                                  Private Sub Oper1_Change()
                                                                  End Sub


Labels:

             laabel onde esta escrito "Digite a temperatura: ":

                                                                                       Private Sub Label2_Click()

                                                                                       End Sub
                      

            label onde está escrito "Resultado:":
                                                                           Private Sub Label1_Click()
                                                                           End Sub
         
            label onde aparece o resultado:
                                                                 Private Sub resultado_Click()
                                                                 End Sub

Botões:
            botão onde esta escrito "Converter para Fahrenhei":

                                                                                            Private Sub cmdconverter_Click()

                                                                                            resultado.Caption = 9 / 5 * Val(oper1.Text) + 32

                                                                                            End Sub

            
             botão sair:
                                Private Sub cmdsair_Click()
                                End
                                End Sub