Visual Basic - SUMAR EN TIEMPO DE EJECUCION

COMO TENGO QUE HACER PARA QUE EN UN FORMULARIO DE CARGA, ME MUESTRE EL TOTAL EN UN TEXTBOX A MEDIDA QUE VOY CARGANDO OTROS TEXTBOX.
QUE SUME AUTOMATICAMENTE.
GRACIAS

Hola César..

Sencillo... Suponiendo que los textbox que debes sumar son de Text1 al Text5, y el TextBox del resultado se llama txtResultado....

Private Sub Text1_KeyPress (KeyAscii as Integer)
If KeyAscii = 13 Then 'Si presiona el ENTER
Call Sumar
KeyAscii = 0 ' El 0 hace que no haga beep al presionar ENTER
End If
End Sub
................
................
................
................
Private Sub Text5_KeyPress (KeyAscii as Integer)
If KeyAscii = 13 Then 'Si presiona el ENTER
Call Sumar
KeyAscii = 0 ' El 0 hace que no haga beep al presionar ENTER
End If
End Sub

Private Sub Sumar
Dim Total as Single

Total = Val(Text1) + Val(Text2) + Val(Text3) + Val(Text4) + Val(Text5)
txtResultado = Total
End Sub

Espero que te sirva... Saludos!!!!!

TE AGRADESCO MUCHO TU AYUDA MATÍAS, PERO VOS SABES QUE NO ME FUNCIONO, ¿TENRA ALGO QUE VER QUE SEAN "TEXTFIELDS"?

Ahora no los recuerdo, pero supongo que deben tener una propiedad "text".

OK NO TE HAGAS DRAMA, YA QUE ESTOY DE PASO TE HAGO OTRA CONSULTA, ES SOBRE EL "CRYSTAL REPORT"

tengo el siguient problema:
el reporte me muestra las siguientes columnas con datos:

NOMBRE----COMP-----NETO 1-------- NETO2------ IVA 1--- IVA 2 -----TOTAL
JUAN----------- B----------- 100 ---------------0------------ 21------- 0--------- 121
PEDRO --------B------------- 0---------------- 50----------- 0-------- 10--------- 60
JUAN----------- A------------- 0--------------- 200----------- 0-------- 21-------- 221
PEDRO --------A -----------125--------------- 0------------ 50-------- 0--------- 175

YO QUIERO MOSTRA EN EL RESUMEN

EL TOTAL DE PEDRO SI ES B Y AL NETO 2, SERIA = 60
TOTAL DE PEDRO SI ES A Y AL NETO 1, SERIA = 175
NETO DE PEDRO SI ES A Y AL NETO 1,SERIA = 125
Y ASI CON TODOS

INTENTE CON "IF THEN ELESE" PERO ME SUMA TODO, NO ME TOMA LAS CONDICIONES