折扣问题

[yz717171]

1000元

折扣%5

怎么算

[dianyancao]

5152535455666666666

[yz717171]

100X17％ 怎么算

[clear_zero]

你要想算最后的价格1000*0.95
。。。。。。。。。。。。

[王二.麻子]

如果你逛过商店，知道什么是折扣就应该能明白什么是5%折扣。

说话有点刻薄了

[wzz19901226]

我猜楼主，应该是要代码吧？应该不是纯粹的算数吧！

[simon__sun]

1000*（1-5/100）

[熊孩子开学喽]

msgbox 1000 * 0.05

[twy1392336]

1000折扣5%，不就是1000-1000*5%吗？

[心匪石不可转]

lz 要的是这个吧

Private Sub Command1_Click()
    Dim strT As String
    
    strT = "5%"
    
    Debug.Print 1000 * (1 - Val(strT) / 100)
    
End Sub

[dbcontrols]

msgbox format(1000 * 0.05,"0.00")

[jhone99]

我猜应该是要这个

Private Sub Command1_Click()
    Dim strT As String
    
    strT = "5%"
    
    Debug.Print 1000 * (1 - Val(strT) / 100)
    
End Sub

[jhone99]

我猜lz应该是想要这个

Private Sub Command1_Click()
    Dim strT As String
    
    strT = "5%"
    
    Debug.Print 1000 * (1 - Val(strT) / 100)
    
End Sub