Ficha3-1

Private Sub cmd_Click()
resultado1.Caption = Val(oper1.Text) + Val(oper2.Text) + Val(oper3.Text)
resultado2.Caption = resultado1.Caption / 3
End Sub



Private Sub Cmd2_Click()
End
End Sub