皮皮学,免费搜题
登录
搜题
【简答题】
阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。 【说明】 本应用程序的运行窗口如图2所示。 窗口中的3个文本框和两个按名称分别为Txt_salary、Txt_base、Txt_tax、Cmd_compute和Cmd_quit。运行时,文本框Txt_base存放的是免税金额基数(应扣除的基本费用co)当用户在文本框Txt_salary中输入月收入(工资或薪金)并单击“计算”按Cmd_compute后,Txt_tax框中就显示计算所得的应纳税额。文本框Txt_base和Txt_tax在运行时不接受用户输入,Txt_base的内容以灰色显示。 个人工资(或薪金)所得税是按照超额累进的税率来征收的,方法是:以每月收入总额减去免税金额基数后的余额作为该月的月应纳税所得额,再将应纳税所得额按相应级数采用相应的税率进行累进计算。目前的免税金额基数为800元,税率如表1所示。 设一个人的月应纳税所得额为K(元),用下面的公式计算其应缴纳的个人所得税额S (元); 若0<K≤500,则S=K×5%; 若500<K≤2000,则S=500×5%+(K-500)×10%; 若2000<K≤5000,则S=500×5%+1500×10%+(K-2000)×15%; 若5000<K≤20000,则S=500×5%+1500×10%+3000×15%+(K-5000)×20%; 例如,某人某月工资总额为4100元,减去800元后,应纳税所得额为3300元,其应缴纳的个人所得税额为500*5%+1500*10%+1300*15%=370元。 在开发过程中,需要编写的程序代码如下; 【程序】 Option Base 0 Private Sub Cmd_compute_Click( ) Dim paylevel,taxPrate paylevel = Array(0,500,2000,5000,20000,40000,60000,80000,100000, _1000001) taxPrate = Array (5,10,15,20,25,30,35,40,45) K=(1) S=0 If(K>0) Then For j = 1 To 9 If (2) Then S = S + (paylevel(j) - paylevel(j -1) ) * taxPrate(j - 1)/100 Else S=S+(3)*taxPrate(j-1)/100 Exit For End If Next j Ent If (4)=Str $(S) End Sub Private Sub Cmd_quit_Click( ) End End Sub Private Sub Form_Load() Txt_tax. Text =' ' Txt_salaw. Text =' ' Txt_base. Text = 800 Txt_tax. Locked = True Txt_base. Enabled =(5) End Sub
拍照语音搜题,微信中搜索"皮皮学"使用
参考答案:
参考解析:
知识点:
.
..
皮皮学刷刷变学霸
举一反三
【单选题】安静状态下,人体产热量最高的器官或组织是
A.
心脏
B.
C.
肝脏
D.
肾脏
【简答题】使用示波器之前必须检查 是否与示波器要求的电源电压一致。
【单选题】患者女,50岁。患支气管扩张,咳嗽,咳痰,痰量60ml/d,最主要的护理措施是
A.
提供通风良好的病室环境
B.
指导患者大量饮水
C.
体位引流
D.
机械吸痰
E.
鼓励患者进行有效咳嗽
【单选题】安静状态下,人体产热量最高的器官或组织是
A.
心脏
B.
C.
D.
【单选题】支气管扩张患者最主要的护理措施是( )
A.
促进排痰
B.
口腔护理
C.
预防咯血窒息
D.
卧床休息
E.
加强饮食
【单选题】安静状态下,人体产热量最高的器官或组织是()
A.
肝脏
B.
C.
心脏
D.
肾脏
E.
脾脏
【单选题】旅游故障按责任来划分,可分为
A.
既成故障与将成故障
B.
责任性故障与非责任性故障
C.
重大故障与-般故障
D.
责任性故障与一般故障
【单选题】旅游故障按责任来划分,可分为
A.
既成故障与将成故障
B.
责任性故障与非责任性故障
C.
重大故障与一般故障
D.
责任性故障与一般故障
【多选题】按责任来划分,旅游故障可分为( )。
A.
责任性故障
B.
非责任性故障
C.
技术性故障
D.
自然性故障
【单选题】患者男性,36岁,患支气管扩张,咳嗽,咳痰,痰量60ml/d,最主要的护理措施是()。
A.
提供通风良好的病室环境
B.
指导病人大量饮水
C.
体位引流
D.
机械吸痰
E.
鼓励病人进行有效咳嗽
相关题目: