Public Class Form1

    Private Sub bADD_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bADD.Click
        '///add two numbers
        '--(attempt1)Lresult.Text = tA.Text + tB.Text
        '0. init,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 result in Lresult
        Me.Lresult.Text = Format(r)
    End Sub
End Class