SoloCodigo

OTRA PREG...¿COMO PUEDO HACER PARA REDONDEAR LAS CANTIDADES?.....POR EJEMPLO SI MI RESULTADO ES LANZADO EN UN TEXT ..SU VALOR ES 99.999999 COMO PODRIA CAMBIAR ESE NUMERO A 100 PARA QUE QUEDE RENDONDEADO....ESPERO PUEDAN AYUDARME Y GRADESCO SU ATENCION....SALUDOS

GRACIAS... ME SIRVIO DE MUCHO TU RECOMENDACION EN EL USO D UCASE.. Y YA LO EJECUTE CON F8 Y ME MARCA LA VARIABLE CANTIDAD COMO VACIA HAY ES DONDE ME PONE EL ERROR YA INTENTE CON

[CODE]
IF CANTIDAD="" THEN
MSGBOX "INSERTA CANTIDAD"
END IF


PERO ME SIGUE HACIENDO LO MISMO


Y PERDON POR NO USAR CODE PERO ES K  TODAVIA NO ENTIENDO MUY BIEN ESTA MECANICA....GRACIAS POR LA OBSERVACION

  SALUDOS

gracias tambien habia pensado en un while entonces podria decirse:

mientras

x sea mayor o menor a la suma de las dos lavadoras se incrementara en 1 lavadora mediana

tomando en cuenta k x es la cantidad k insertara el usuario kedaria asi:
Do While (x >= (text2.text+text3.text))
        text2.Text = text2.Text + 1
        text3.Text = text3.Text + 1
         x=((text2.text)+(text3.text))

hasta hay kedaria para las dos lavadoras las cuales cuenta con un cierto numero d capacidad entonces para la combinadale inserto una condicion:

si x es mayor o igual a la capacidad d la lavadora gde incremento en esta, y decremento x a la capacidad de la lavadora grande y lo mismo hago con la mediana

muchas gracias por la aportacion

lo intentare con un while y condiciones

saludos

lo k pasa es k trabajan 3 lavanderias la mediana la grande y combinada al mismo  tiempo en el programa me pide la descripcion del producto
y = InputBox("CAPTURA LA DESCRIPCION A LAVAR.")
ya k depende del producto es la capacidad maxima para cada lavadora y cuantas piezas se van a lavar yo toomo en cuenta que son mil piezas por cada producto e intento parrtir d ese numero, entonces despues d k pide la descripcion le va a dar la capacidad maxima en este caso se trata de tablones y al caturar tablon me va a decir k en la mediana tiene un max d 30 y en la grande un max d 40
If y = "TABLON" Or y = "tablon" Then
Label5.Caption = y
Text2.Text = "30"
Text3.Text = "40"


 despues capturan el numero d piezas a lavar
X = InputBox("NUMERO DE PIEZAS:")

por ejemplo son 100 piezas las k van a lavar lo k kiero lanzar como resultado es el numero d cargas  k debe tener cada lavadora ya k por cada 30 y 40 pzas sera una carga respectivamente asta llegar a las 110
30                   +             40                                  + 10 k se van a la combinada
1 carga                            1 carga   =llevo 70 pzas
1 carga                                                                  1 carga
completo las 110pzas

en este caso el resultado seria

mediana                     grande                  combinada
2                                   1                              1           no. de cargas a lavar


esto es lo k precisamente el programa debe lanzar como resultado es por eso k le meti un ciclo y dentro del ciclo un contador

For I = 1 To 1000 Step 1
 If (X = Val(Text2.Text) + Val(Text3.Text)) Then
  suma = suma + 1
  Label7.Caption = suma
  Else
  I = I + 1
 
  End If
 Next I
 End If
para 1000 pzas
si x(no d pzas a lavar) va a ser igual a 70 ya k trabajan al mismo tiempo entonces sera igual a una carga con el contador suma=suma+1 tomando en cuenta k como inicia el ciclo la suma es =0 y lo visualiza en una etiketa si no es asi regresa al ciclo, o acaso esta mal mi metodologia???


d antemano muchas gracias y espero puedas entenderlo


saludos