Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load



    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub


    Private Sub resta_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim num1, num2 As Integer
        num1 = numero1.Text
        num2 = numero2.Text
        MsgBox(num1 + num2
               )




    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim num1, num2 As Integer
        num1 = numero1.Text
        num2 = numero2.Text
        MsgBox(num1 - num2
               )

    End Sub

    Private Sub btnmayor_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnmayor.Click
        Dim mayor As Boolean
        mayor = numero1.Text > numero2.Text

        MsgBox(mayor)




    End Sub

    Private Sub btndistinto_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndistinto.Click
        Dim distinto As Boolean
        distinto = numero1.Text <> numero2.Text

        MsgBox(distinto)

    End Sub

    Private Sub btnmenor_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnmenor.Click
        Dim menor As Boolean
        menor = numero1.Text < numero2.Text

        MsgBox(menor)

    End Sub

    Private Sub btnigual_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnigual.Click
        Dim igual As Boolean
        igual = numero1.Text = numero2.Text

        MsgBox(igual)

    End Sub
End Class