palazzo vb. sorry forgot the name in the filename. 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. INIT, DECLARATIONS, etc. Dim a As Integer ' First input value Dim b As Integer ' Second input value Dim r As Integer ' Third input 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 Private Sub bClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bClear.Click ' Clear tA.Text and tB.Text Me.tA.Text = "" Me.tB.Text = "" Me.lResult.Text = "." End Sub End Class