quarta-feira, 14 de outubro de 2015

                                                       Exercício 1 ficha 1


Ambiente gráfico da aplicação:


Agora vamos ao código!

Textboxs:
                 Textbox lado direito:
                                                     Private Sub Oper1_Change()
                                                     End Sub

                 Textbox lado esquerdo:
                                                         Private Sub Oper2_Change()
                                                         End Sub




Labels:
            Símbolo do +  no meio das textbox:
                                                                       Private Sub Simbolo_Click()
                                                                       End Sub

             Label (onde aparece o resultado):
                                                                    Private Sub resultado_Click()
                                                                    End Sub



Botões:

               Botão =:
                               Private Sub cmdigual_Click()
                               resultado.Caption = Val(Oper1.Text) + Val(Oper2.Text)


              botao sair:
                                Private Sub cmdsair_Click()
                                End
                                End Sub
 

Sem comentários:

Enviar um comentário