VB个人所得税计算有两个文本框和一个按钮,在第一个文本框输入金额点击按钮算出来的结果在第二个文本框显示2000块起征点扣

VB个人所得税计算
有两个文本框和一个按钮,在第一个文本框输入金额点击按钮算出来的结果在第二个文本框显示
2000块起征点
扣税方法:
级数 应纳税所得额(含税所得额) 税率% 速算扣除数(元)
一 不超过500元 5 0
二 超过500元至2000元 10 25
三 超过2000元至5000元 15 125
四 超过5000元至20000元 20 375
五 超过20000元至40000元 25 1375
六 超过40000元至60000元 30 3375
七 超过60000元至80000元 35 6375
八 超过80 000元至100000元 40 10375
九 超过100000元 45 15375
大概计算方法是金额*税率% -速算扣除数(元)
大概计算方法是(金额-2000)*税率% -速算扣除数(元)
formula555 1年前 已收到1个回答 举报

HACK1983 幼苗

共回答了21个问题采纳率:95.2% 举报

Private Sub Command1_Click()
Dim s
s = Val(Trim(InputBox("个人收入:","个人所得税计算",2000)))
Print "个人收入为"; s; "元时,应缴纳的个人所得税为";
If s

1年前

10
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 0.028 s. - webmaster@yulucn.com