SoloCodigo

Sé que es uan pregunta algo tonta, pero no pude conseguir ni aqui ni siquiera en otras webs algo tan simple como calcular Porcentaje en VB, sé que el Format se le indica con algo de Percent que lo que hace al parecer es multiplicar por 100 el dato colocando al final un simbolo de %, realmente no sé como es que se determinaria el procentaje asi.

Creo que de forma estadistica el monto se multiplicaria asi
Sacar el 50% a un monto ==> monto*0.5
Sacar el 5% a un monto ==> monto*0.05
Sacar el 30% a un monto ==> monto*0.30

Cómo podría determinarse el calculo de un dato numerico en base a un porcentaje de descuento. Tengo un pequeño combobox que despliega unos valores 10, 15, 20, 30
y trataba de ver si algo como Desc = "0." & cmbDescuento.Text pero me el codigo no agarra el "0." lo desprecia u omite. Trate con Format(cmbDescuento.Text, Percent) pero tampoco, si indico 30, ese mismo valor es el que se sale, por lo que siempre, en vez de calcularse, monto*0.30 lo hace con monto*30

gracias tocayo  

PD: hoy juega en mi ciudad Argentina vs Colombia, y es más de saberse que ganara Argentina, o al menos esas son las probabilidades    

Salu2.

Si lo que quieres es sumarle un porcentaje a la cantidad, multiplica
Cantidad*1.porcentaje
y si es quitar (Cantidad*1.porcentaje)-Cantidad, esto deja el descuento
     

Tengo un sistema que calcula el precio de un producto al darle el número de articulos a comprar...!
Lo hace de la siguiente forma y obtego el IVA...!!
Me imagino que te servirá de algo este código .....




Private Sub Articulos_Change()

If Val(Existencia.Text) > Val(Articulos.Text) Or Val(Existencia.Text) = Val(Articulos.Text) Then
   Subtotal.Text = Val(Precio.Text) * Val(Articulos.Text)
   Total.Text = Val(Subtotal.Text) * 1.15
   IVA.Text = Val(Subtotal.Text) * 0.15
Else

   If Existencia.Text = "" Then
      Var2 = 0
   Else
     MsgBox "Producto Agotado", vbInformation, "Alerta"
   End If
End If
End Sub