首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下应用说明及Visual Basic程序代码,将应填入______处的语句写在答题纸的对应栏内。 [应用说明9] 本应用程序的运行窗口如图2-6所示。 窗口中的3个文本框和2个按钮,名称分别为Txt_salary,Txt_b
阅读以下应用说明及Visual Basic程序代码,将应填入______处的语句写在答题纸的对应栏内。 [应用说明9] 本应用程序的运行窗口如图2-6所示。 窗口中的3个文本框和2个按钮,名称分别为Txt_salary,Txt_b
admin
2007-03-10
52
问题
阅读以下应用说明及Visual Basic程序代码,将应填入______处的语句写在答题纸的对应栏内。
[应用说明9]
本应用程序的运行窗口如图2-6所示。
窗口中的3个文本框和2个按钮,名称分别为Txt_salary,Txt_base,Txt_tax,Cmd compute和Cmd_quit。运行时,文本框Txt_base中存放的是免税金额基数(应扣除的基本费用)。当用户在文本框Txt_salary中输入月收入(工资或薪金)并单击“计算”按钮 Cmd_compute后,Txt_tax框中就显示计算所得的应纳税额。文本框Txt_base和Txt_ tax在运行时不接受用户输入,Txt_base的内容以灰色显示。
个人工资(或薪金)所得税是按照超额累进的税率来征收的,其计算方法参考试题8。
[程序代码9]
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
End If
(4)=Str$(S)
End Sub
Private Sub Cmd_quit_Click()
End
End Sub
Private Sub Form_Load()
Txt_tax.Text=“”
Txt_salary.Text=“”
Txt_base.Text=800
Txt_tax.Locked=True
Txt_base.Enabled=(5)
End Sub
选项
答案
(1)Txt_salary.Text-Txt_base.Text (2)K>PayLevel(j) (3)K-paylevel(j-1) (4)Txt_tax.Text (5)False
解析
本题与试题8是同样的问题(但比试题8简单,因为这里只计算一个人的所得税),只是用VB来实现而已。
显然,在上面的程序中,K表示月应纳税所得额,所以,(1)空应填写Txt_salary. Text-Txt_base.Text。
下面讨论所得税的计算问题。从题目说明中给出的计算公式中可以看出,税金的计算是采用逐级累计的方式。(2)空应判断月应纳税所得额是否超过了第j级,所以,(2)空应该填写K>PayLevel[j]。
如果一个职工的月应纳税所得额大于第j级,则其第j-1级收入的全额部分应按适用税率计算税额((paylevel[j]-paylevel[j-1]) * taxPrate[j-1]/100);如果一个职工的月应纳税所得额不大于第j级(没有到达第j级),则其第j-1级收入的实际超出部分采用适用税率计算税额。因此,(3)空应填写K-PayLevel[j-1]。
计算结束后,应该把计算结果显示在对应的文本框(Txt_tax)中,因此,(4)空是一个显示语句,即为Txt_tax.Text=Str$(S)。
因为试题要求文本框Txt_base和Txt_tax在运行时不接受用户输入,Txt_base的内容以灰色显示,所以需要设计其Enabled属性(可在设计时确定,也可在窗体启动时确定,本题选择第二种方式)为False。
转载请注明原文地址:https://kaotiyun.com/show/wzjZ777K
本试题收录于:
程序员下午应用技术考试题库软考初级分类
0
程序员下午应用技术考试
软考初级
相关试题推荐
当用户下载了自己所需的应用程序后,一般还需要再安装。执行安装的过程中一般不会()。
许多计算机在暂停一段时间不用时会自动进入待机状态。这种状态的特点不包括()。
在WindowsXP中,“磁盘碎片整理程序”的主要作用是(39)。
一般来说,误删本地磁盘中某个文件后,还可以用以下方法()来补救。
把数据从本地计算机传送到远程主机称为______。
下面不属于软件开发过程的是______。
在Excel中,绝对地址在被复制或移动到其他单元格时,其单元格地址______。
某一个PPT文档共有8张幻灯片,现选中第4张幻灯片,改变幻灯片背景设置后,单击“应用”按钮,则______。
操作系统的资源管理功能不包括________________。
随机试题
作者甲将自己创作的一部小说交乙出版社出版,但双方始终未签订出版合同。事后,甲又与丙出版社签订了专有出版合同,将此书稿交丙出版。现乙对甲和丙提出异议。本案依法应如何认定?()
word操作题 小王利用word2010编辑了如下图所示的一个文档,结合所学知识回答下列问题: 用户在________对话框中可以精确设定表格的行高和列宽值。
=()
跟肝风内动有关的舌象是
A.达克罗宁B.利多卡因C.普鲁卡因D.氯胺酮E.氟烷
腹膜间位器官有()
压力容器安装施工前,从事压力容器安装的单位应当向()书面告知。
良好的口语交际能力是现代公民的重要__________。口语交际是在一定的语言__________中相互传递信息、分享信息的过程,是人与人之间交流和__________的基本手段。填入画横线部分最恰当的一项是:
若有以下程序段charstr[4][12]={"aa","bbb","ccccc","d"},*strp[4];inti;for(i=0;i
Howmanytimesdoesthemanhavehishaircuteverymonth?
最新回复
(
0
)