vb 个税计算器功能要求:1、 税率表应纳个人所得税税额=(应纳税所得额-扣除标准)*适用税率-速算扣除数纳税基数2000元,超出部分纳税如下:不超过500元的,税率5%,速算扣除数为0;超过500
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/23 18:33:19
vb 个税计算器功能要求:1、 税率表应纳个人所得税税额=(应纳税所得额-扣除标准)*适用税率-速算扣除数纳税基数2000元,超出部分纳税如下:不超过500元的,税率5%,速算扣除数为0;超过500
vb 个税计算器
功能要求:
1、 税率表
应纳个人所得税税额=(应纳税所得额-扣除标准)*适用税率-速算扣除数
纳税基数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
超过80000元至100000元的部分,税率40%,速算扣除数为10375
超过100000元的部分,税率45%,速算扣除数为15375
例如:个人收入1800,不纳税
个人收入2250元,纳税额((2250-2000)-0)*5% +0
个人收入3500元,纳税额((3500-2000)-500)*10%+25
个人收入9000元,纳税额((9000-2000)-5000)*20%+125
2、 要求输入任意工资(可不足一元),计算应缴纳所得税.
vb 个税计算器功能要求:1、 税率表应纳个人所得税税额=(应纳税所得额-扣除标准)*适用税率-速算扣除数纳税基数2000元,超出部分纳税如下:不超过500元的,税率5%,速算扣除数为0;超过500
'添加控件Command1,
'控件Text1输入工资,控件Text2输出应缴纳所得税
Private Sub Command1_Click()
Dim t As Currency
t = Text1 - 2000
Select Case t
Case Is