Visual Basic - Calculo simple en VB6 - Ayuda por favor

Life is soft - evento anual de software empresarial
 
Vista:

Calculo simple en VB6 - Ayuda por favor

Publicado por Alejandro (2 intervenciones) el 20/02/2010 01:19:01
Hola a todos Resulta que estoy haciendo una aplicacion en VB6 y es para calcular margenes y saber qué etiquetear en un producto o articulo rapidamente.

Puse varios textbox y abajo muestro el codigo, pero no calcula bien y peor cuando hay un , es decir un decimal por ejemplo 1,5


Total_Proveedor.Text = Importe.Text + (Importe.Text * IVA) / 100
Total_Margen.Text = Importe.Text * Margen.Text / 100
Resultado.Text = Importe.Text + Total_Margen.Text * ValorIVA.Text / 100

¿Alguien podria ayudarme? No sé si fui claro o deberia ingresar mas datos para mostrar la idea pero resumiendo explico:
Total_proveedor.text es el costo que yo pagué el producto mas el IVA que pagué ese producto que puede variar.
Total_margen.text = el valor que ingresé en el importe mas el porcentaje que ingrese que es aleatorio segun el producto y ese valor es en %.
Resultado.text = valor ingresado en importe mas el margen obtenido mas el valor del iva que ingrese segun el producto.

¿Fui claro? Sepan disculpar si los mareé.

Ojalá puedan ayudarme.

Muchas gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Calculo simple en VB6 - Ayuda por favor

Publicado por Josman Pérez (40 intervenciones) el 20/02/2010 03:49:06
primero has esto

'en una varible guarda el Multiplicador del iva asi
PorcentajeIVA= (IVA/100) + 1

'en otra el Margen de Ganancia
MargenGanancia= (cdbl(Margen.text) /100) + 1

Total_Proveedor.Text = Importe.Text * PorcentajeIVA
Total_Margen.Text = Importe.Text * MargenGanancia
Resultado.Text = (Importe.Text + Total_Margen.Text) * PorcentajeIVA

'si al final te da muchs decimales y quieres redondear haces lo siguiente

Resultado.Text = round(Resultado.Text,2)

espero te sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Calculo simple en VB6 - Ayuda por favor

Publicado por Ale Ramba (1 intervención) el 20/02/2010 04:42:26
porq no ingresas todo el codigo desde el principio para poder comprender mejor q es lo que kieres hacer...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar