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
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):
Código
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 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:
Código
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!