【个人税计算器】用VB编程个人税税率计算器拜托各位大神级数--全月应纳税所得额...
答案:2 悬赏:60 手机版
解决时间 2021-02-22 15:58
- 提问者网友：酱爆肉
- 2021-02-22 00:02
【个人税计算器】用VB编程个人税税率计算器拜托各位大神级数--全月应纳税所得额...
最佳答案
- 五星知识达人网友：廢物販賣機
- 2021-02-22 01:17
【答案】 Dim b As Long b = Val(Text1.Text) Select Case b Case Is > 100000 Text1.Text = (b - 100000) * 0.45 + 29250 Case 80000 To 100000 Text1.Text = (b - 80000) * 0.4 + 21250 Case 60000 To 80000 Text1.Text = (b - 60000) * 0.35 + 14250 Case 40000 To 60000 Text1.Text = (b - 40000) * 0.3 + 8625 Case 20000 To 40000 Text1.Text = (b - 20000) * 0.25 + 3625 Case 5000 To 20000 Text1.Text = (b - 5000) * 0.2 + 625 Case 2000 To 5000 Text1.Text = (b - 2000) * 0.15 + 175 Case 500 To 2000 Text1.Text = (b - 500) * 0.1 + 25 Case 0 To 500 Text1.Text = b * 0.05 Case Else MsgBox 输入错误! End Select
全部回答
- 1楼网友：孤独的牧羊人
- 2021-02-22 01:27
和我的回答一样，看来我也对了
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯