Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Como realizar Calculos de Modelos de Inventario?..

Estas en el tema de Como realizar Calculos de Modelos de Inventario?.. en el foro de Visual Basic clásico en Foros del Web. Hola estimados, tengo q rendir , y me encagaron realizar un programa q permita calcular los siguientes modelos: Modelo de Facturación con deficit Modelo de ...
  #1 (permalink)  
Antiguo 13/06/2011, 07:24
 
Fecha de Ingreso: junio-2008
Mensajes: 58
Antigüedad: 15 años, 9 meses
Puntos: 0
Como realizar Calculos de Modelos de Inventario?..

Hola estimados, tengo q rendir , y me encagaron realizar un programa q permita calcular los siguientes modelos:

Modelo de Facturación con deficit
Modelo de Manufacturación sin Deficit.
Modelo de Reabastecimiento por compra con reposición.
Modelo de Reabastecimineto por compra sin reposición.

En los 4 modelos aplicamos masomenos 5 o 6 formulas.

El interfaz y todo lo demás lo hago tranquilo, pero al momento de realizar el calculo no me sale igual a la calculadora.
Como ejemplo les dejo el BOTON que el calculo hace de obtención de CTU( costo total por unidad) del primer modelo:

Código:
Private Sub Command1_Click()
Dim c1, c2, c3, r, k, X, X2 As String
c1 = Text1.Text
c2 = Text2.Text
c3 = Text3.Text
r = Text4.Text
k = Text5.Text
X = Math.Sqr((2 * r * c1 * c2 * c3 * (1 - (r / k))) / (c1 + c2))

Text6.Text = X
De resultado me da : 350,909220111974

En cambio en la calculadora me da:
321.21

Los valores de las variables son los siguientes:

C1=0.15
C2=1.66
C3=500
r=1500
K=3000

Alguien sabe por que me sale diferente los calculos....les dejo un patallazo de mi calculo:

Diseño:



Calculo botón



Recuerden que Math.Spr es la raiz cuadrada....

Por favor ayudaaaaaaaaaa!!! Uso visual basic 6.0
  #2 (permalink)  
Antiguo 16/06/2011, 21:03
Avatar de Kruzado  
Fecha de Ingreso: marzo-2007
Mensajes: 307
Antigüedad: 17 años
Puntos: 17
Respuesta: Como realizar Calculos de Modelos de Inventario?..

esta re facil po'

declaraste tus variables como string cierto??? por eso el resultado final difiere de la calculadora, para que te funcione como tu quieres debes comvertir esos string en numeros, prueba con esto :

X = Math.Sqr((2 * Val(r) * Val(c1) * Val(c2) * Val(c3) * (1 - (Val(r) / Val(k)))) / (Val(c1) + Val(c2)))

saludos !!!!

Etiquetas: inventario, modelos, realizar, calculo
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 02:26.