问一个关于个人所得税的问题~~~~ 晕~~~我来新公司时竟然忘了问工资是税前还是税后的了。现在4K基本工资,是在北京,那么要交多少个人所得税啊???一直不明白这个个人所得税是如何算的。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 case fieldbyname('应发工资').asinteger-880 of //计算个人所得税 0..500: FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.05; 501..2000: FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.1 - 25; 2001..5000: FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.15 - 125; 5001..20000: FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.20 - 375; 20001..40000:FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.25 - 1375; 40001..60000:FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.30 - 3375; 60001..80000:FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.35 - 6375; 80001..100000:FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.40 - 10375; 100001..9000000:FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.45 - 15375; else FieldByName('sds').AsCurrency:=0; end; //end of case 应发工资//FieldByName('sds')是要扣的所得税字段 FastReport的合计问题 如何来控制indy Tcpclient 传输速度? 请教delphi连oracle数据库时,事务的问题。 前10位有分。override和overload叫法 WM_COPYDATA 和 内存映射文件 的比较 求文本数据库加密和解密的方法(来者有分) 从vb转向delphi,有无好建议 dll 中字符串的传递问题? delphi中写入string到内存的问题 字符串比较,还会加分。 一程序员的的迷茫-关乎代码生涯生死 请问PopupMenu控件怎么使用
0..500: FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.05;
501..2000: FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.1 - 25;
2001..5000: FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.15 - 125;
5001..20000: FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.20 - 375;
20001..40000:FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.25 - 1375;
40001..60000:FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.30 - 3375;
60001..80000:FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.35 - 6375;
80001..100000:FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.40 - 10375;
100001..9000000:FieldByName('sds').AsCurrency:=(fieldbyname('应发工资').AsCurrency-880)*0.45 - 15375;
else
FieldByName('sds').AsCurrency:=0;
end; //end of case 应发工资//FieldByName('sds')是要扣的所得税字段