2. 计算机
  3. 阅读以下应用说明及Visual Basic程序代码，将应填入______处的语句写在答题纸的对应栏内。 [应用说明9] 本应用程序的运行窗口如图2-6所示。 窗口中的3个文本框和2个按钮，名称分别为Txt_salary，Txt_b

阅读以下应用说明及Visual Basic程序代码，将应填入______处的语句写在答题纸的对应栏内。 [应用说明9] 本应用程序的运行窗口如图2-6所示。 窗口中的3个文本框和2个按钮，名称分别为Txt_salary，Txt_b

admin2007-03-10  48
问题 阅读以下应用说明及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://jikaoti.com/ti/PeW7FFFM
本试题收录于： 程序员下午应用技术考试题库软考初级分类
0

程序员下午应用技术考试

软考初级

相关试题推荐
随机试题
最新回复(0)