Cita:
Iniciado por ernestoelunico 
pero imaguina que cambian un dato de un text que ya tenia un numero y lo barraron para poner otro creo entonce que ahi abri un problema o me equivoco
pienso que para optimizar esto tendria que primero tomas el mumeroque hay ahi y restarselo y luego sumarselo usar gotfocuos o algo asi.
otra cosa esto sin importar que use el mas como las letras tab ???
Tampoco hay que pensar demasiado para solucionar eso.
Private Sub Text1_LostFocus(Index As Integer)
Dim i As Integer, d As Double
On Error Resume Next ' por si algun TextBox está en blanco
For i = 0 To Text1.UBound
d = d + Val(Text1(i))
Next i
txtSuma = d
End Sub
Si los TextBox no están en un array de controles, repites el código en el mismo evento por cada control.
'otra cosa esto sin importar que use el mas como las letras tab ???'
¿Qué quieres decir con eso? no entendí nada!
