Sumar dentro de un TextBox

[Aquaventus]

Hola javirk es cuestion de que lo tomes con calma y analizes, de hecho se va a recorrer la cadena ingresada, aqui te dejo el codigo del evento click al pulsar un boton :

Código vb.net:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'Validamos si en caso este vacio
        If TextBox1.Text.Trim.Length = 0 Then
            MessageBox.Show("El Textox esta vacio!")
        Else
            'Pasamos la cadena a un array
            Dim array() As Char = TextBox1.Text.ToCharArray()
            'Declaramos una una variable para la nueva cadena
            Dim nuevo As String = ""
            'Creamos una variable para obtener la suma total
            Dim total As Integer = 0
            'Recorremos el array que contiene la cadena
            For indice As Integer = 0 To array.Length - 1
                'Sumamos los valor recorridos
                total = total + CInt(array(indice).ToString())
                'Si el indice recien comienza le adjuntamos el char
                'sino adjuntamos el + y el char
                If indice = 0 Then
                    nuevo = nuevo & array(indice)
 
                Else
                    nuevo = nuevo & "+" & array(indice)
                End If
                'Si esta en la ultima posicion agregamos el =
                'y adjuntamos el total sumado
                If indice = array.Length - 1 Then
                    nuevo = nuevo & "=" & total
                End If
            Next
            'Imprimimos el resultado
            TextBox1.Text = nuevo
        End If
    End Sub
 

Espero haberte ayudado, lee los comentarios para que entiendas. Saludos!.