el txtbox es singleline
lo que hago es entro el valor
1.25
vacio el campo con txtbox.text=string.empty
y luego entro otro valor
.89
y con el otro boton obtener la suma
ah, estás usando el mismo textbox, por lo que entiendo basicamente como si fuese una calculadora, entras un valor, le das a un botón para limpiar el valor, entras otro valor, y le das a otro botón para obtener el resultado.
No me parece muy practico utilizar el mismo textbox para 2 funciones distintas (introducir los valores a sumar y mostrar el resultado), yo usaría un Textbox adicional para mostrar el resultado, pero si así es como prefieres con 1 solo textbox entonces podrías hacerlo de esta manera:
C# (traducción al vuelo):
using Microsoft.VisualBasic;
using System;
using System.Collections;
using System.Collections.Generic;
using System.Data;
using System.Diagnostics;
public class testForm
{
// aqui guardarás los valores introducidos
private List
<double> values
= new List
<double>();
private void bt_AñadirValor_Click()
{
double value = 0.0;
if (double.TryParse(tb_Valores.Text.Replace('.', ','), value)) {
values.Add(value);
// añado el valor a la colección de valores.
tb_Valores.Clear();
// limpio el textbox.
} else {
MessageBox.Show("El valor no es válido", "", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}
private void bt_Sumar_Click()
{
tb_Valores.Text = (from value in values).Sum;
values.Clear();
// limpio los valores guardados.
}
private void tb_Valores_KeyPress(object sender, KeyPressEventArgs e)
{
if (e.KeyChar == Convert.ToChar(Keys.Enter)) {
bt_AñadirValor.PerformClick();
}
}
}
//=======================================================
//Service provided by Telerik (www.telerik.com)
//Conversion powered by NRefactory.
//Twitter: @telerik
//Facebook: facebook.com/telerik
//=======================================================
VB:
Public Class testForm
Private values As New List(Of Double) ' aqui guardarás los valores introducidos
Private Sub bt_AñadirValor_Click() Handles bt_AñadirValor.Click
Dim value As Double = 0.0R
If Double.TryParse(tb_Valores.Text.Replace("."c, ","c), value) Then
values.Add(value) ' añado el valor a la colección de valores.
tb_Valores.Clear() ' limpio el textbox.
Else
MessageBox.Show("El valor no es válido", "", MessageBoxButtons.OK, MessageBoxIcon.Error)
End If
End Sub
Private Sub bt_Sumar_Click() Handles bt_Sumar.Click
tb_Valores.Text = (From value As Double In values).Sum
values.Clear() ' limpio los valores guardados.
End Sub
Private Sub tb_Valores_KeyPress(sender As Object, e As KeyPressEventArgs) Handles tb_Valores.KeyPress
If e.KeyChar = Convert.ToChar(Keys.Enter) Then
bt_AñadirValor.PerformClick()
End If
End Sub
End Class
Saludos!