Public Class Form1

    Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        '.....Compute result from the three inut values, display it.
        Dim x As Double    'First value
        Dim y As Double    'Second VALUE
        Dim z As Double    'Third value
        Dim result As Double 'Result value
        Dim s As String = "The sum is "
    End Sub

    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        'INPUT: three values from textboxes
        x = Val(Me.TextBox1.Text)
        y = Val(Me.TextBox1.2.tText)
        z = Val(Me.TextBox1.3.Text)

        'PROCESS: Compute the result from the three #'s
        result = x + y + z     ' Add them, to get result

        'OUTPUT: Show the result.
        Call showit(s, result.
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        IBI.Backcolor = Color.Blue

    End Sub
End Class