Public Class Form1

    Private Sub bAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bAdd.Click
        '//// Add two numbers
        '//// Add # in tA and tB, putting result in lResult

        '----lResult.Text = tA.Text + tB.Text

        '0. INITT, DECLARATIONS, etc.
        Dim a As Integer       ' First input value
        Dim b As Integer
        Dim r As Integer       ' Result value


        '1. INPUT:   get two #'s from tA, tB
        a = Val(Me.tA.Text)
        b = Val(Me.tB.Text)

        '2.Process:        Add THem Up
        r = a + b

        '3.OUTPUT:             Put the answer in lResult
        Me.lResult.Text = Format(r)

    End Sub

End Class