[计算机类试卷]国家二级VB机试（上机操作）模拟试卷117及答案与解析.doc

1、国家二级 VB机试（上机操作）模拟试卷 117及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml的窗体上画两个文本框，其名称分别为 Text1和 Text2，内容分别为 “文本框 1”和 “文本框 2”，编写适当的事件过程。程序运行后，如果单击窗体，则Text1隐藏， Text2显示，如图 3-6(a)所示；如果双击窗体，则 Textl显示； Text2隐藏，如图 3-6(b)所示。注意：程序中不得使用变量。存盘时必须存放在考生文件夹下，工程文 件名为 sjtl vbp，窗体文件名为 sjt1 fr

2、m。(2)在名称为 Forml的窗体上画一个文本框，其名称为 Text1，初始内容为空白；再画一个水平滚动条，其名称为HS1， SmallChange属性为 4， LargeChange属性为 10， Min属性为 0， Max属性为200，编写适当的事件过程。程序运行后，如果在文本框内输入一个数值 (0200)，然后单击窗体，则把滚动条的滚动框移到相应的位置，如图 3-7所示。注意：程序中不要使用变量；存盘时必须存放在考生文件夹下，工程文件名为sit2 vbp，窗体文件名为 sjt2 frm。 二、简单应用题 2 (1)在考生文件夹下有一个工程文件 sjt3 vbp。窗体上有一个标题为 “得

3、分 ”的框架，在框架中有一个名称为 Text1的文本框数组，含六个元素；文本框 Text2用来输入难度系数。程序运行时，在左边的六个文本框中输入 6个得分，输入难度系数后，单击 “计算分数 ”按钮，则可计算出最后得分并在文本框 Text3中显示 (如图 3一175所示 )。计算方法：去掉一个最高得分和一个最低得分，求剩下得分的平均分，再乘以 3，再乘以难度系数。最后结果保留到第 2位小数，不四舍五入。注意：文件中 已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的 ?改为正确的内容。考生不能修改程序中的其他部分和各控件的属性。最后把修改后的文件按原文件名存盘。 (2)在考

4、生目录下有一个工程文件 sjt4 vbp。窗体上的控件如图 3一 176所示。程序运行时，若选中“阶乘 ”单选按钮，则 “1000”、 “2000”菜单项不可用 (如图 3176所示 )，若选中 “累加 ”单选按钮，则 “10”、 “12”菜单项不可用。选中菜单中的一个菜单项后，单击 “计算 ”按钮，则相应的计算结果显示在文本框中 (例如选中 “阶乘 ”和 “10”，则计算 10 1，选中 “累加 ”和 “2000”，则计算 1+2+3+2000) 。单击 “存盘 ”按钮，则把文本框中的结果保存到考生目录下的 out4 dat文件中。要求：编写 “计算 ”按钮的 Click事件过程。注意：不得

5、修改已经存在的程序，在结束程序运行之前，必须用 “存盘 ”按钮存储计算结果，否则无成绩。最后，程序按原文件名存盘。三、综合应用题 3 在考生文件夹下有一个工程文件 sit5 vbp，相应的窗体文件为 sit5 frm。窗体外观如图 35(a)所示。三个命令按钮的名称分别为 Command1、 Command2和Command3，标题分别为 “读取数据 ”、 “首字母大写 ”和 “存盘 ”。程序运行后，如果单击 “读取数据 ”命令按钮，则读取考生文件夹下 in5 txt中的全部文本 (文本中的单词与单词之问或标点符号与单词之间均用一个空格分开 )，并在文本框中显示出来。文本内容如下：Tucked

6、deeowithintheoromisesandpoliciesofhisStateoftheLInionaddress,PresidentBushutteredthreewordsthatsDcakvolumesaboutWashingtonsparalysisinaddressingtheplightoflhefortymillionAmericanswholackhealthinsurance InbetweenhisdiscourseonMedicareandhissupportforalowincomehealthcaretaxcredil，Bushcalledforsomethin

7、gcalledassociationhealthplans如果单击 “首字母大写 ”命令按钮，则将文本框中每个单词的第一个字母变为大写字母 (如果原来 已是大写字母则不改变 )，并在文本框中显示出来，如图 3 5(b)所示；如果单击 “存盘 ”命令按钮，则把文本框中的内容 (首字母大写后 )保存到考生文件夹下的文件 out5 txt中。窗体文件中已给出了部分程序，请把它补充完整，使其实现上述功能。要求： 1)编写“读取数据 ”命令按钮的 Click事件过程。 2)去掉 “首字母大写 ”命令按钮和 “存盘 ”命令按钮事件过程中的注释符，把程序中的 ?改为正确的内容，使其能正确运行。 3)用原来的

8、文件名保存工程文件和窗体文件。国家二级 VB机试（上机操作）模拟试卷 117答案与解析 一、基本操作题 1 【正确答案】 第 1小题要在程序运行时实现题目所要求的功能，只需在窗体的Click事件过程中用代码设置文本框 1的 Visible属性值为 False，文本框 2的Visible属性为 True：在窗体的 DblClick事件过程中用代码设置文本框 1的 Visible属性值为 True，文本框 2的 Visible属性为 False。【操作步骤】步骤 1：新建一个“标准 EXE”工程，在窗体中加入两个文本框并设置它们的相关属性，属性及其值如表 4-3所示。 步骤 2：打开代码编辑窗口，

9、输入如下代码：参考代码： Private Sub Form Click() Textl Visible=False Text2 Visible=True End SubPrivate Sub Form DblCl ick() Text1 Visible=True Text2 Visible=FalseEnd Sub步骤 3：按要求将文件保存至考生文件夹中。第 2小题要在程序运行时，单击窗体就能将滚动条的滑块位置定位到文本框中输入的值，只需要编写窗体的单击事件，令滚动条的 Value属性值等于文本框的 Text属性值。【操作步骤】步骤 1：新建 “标准 EXE”工程，往窗体 Forml中加入一个

10、文本框和一个水平滚动条，分别设置它们的相关属性，属性及其值如表 4-4所示。步骤 2：打开代码编辑窗口，输入如下代码：参考代码： Private Sub Form Click() HSl Value=Val(Text1 Text)End Sub步骤 3：按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 第 1小题 【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt3 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： For k=1 To 5 If a键运行程序，选择不同选项，单击 “数值 ”菜单项，并且选择一个可用的数值

11、，然后单击 “计算 ”按钮得到结果，最后单击 “存 盘 ”按钮保存结果。 三、综合应用题 3 【正确答案】 分析题目可知，本题中 “读取数据 ”命令按钮中首先使用。 For Input方式打开文件，然后通过 LineInput#语句将打开文件中的数据读出到变量 s中并且赋给文本框。 在 “首字母大写 ”按钮的单击事件中，首先依次取出文本框中的每一个字符，然后判断这个字符的上一个字符是否是空格，如果是空格则将该字符使用 LICase函数转换为大写；判断完毕后无论是否转换均将其连接到新的字符串中，同时令这个字符成为新的 “上一个字符 ”。这样，循环结束后每个单词的首字母就转换成 了大写字母。 在

12、“存盘 ”按钮的单击事件中，首先以 Output方式打开文件，然后利用 Write#语句将文本框中的内容写回到文件中，最后关闭文件。 【操作步骤】 步骤 1：打开考生文件夹中的工程文件 sjt5 vbp，在代码编辑窗口中，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： ch=Mid(oldSen， i， 1) newSen=newSen ch Write#1， Text1 Text 步骤 2：编写 “读取数据 ”命令按钮的单击事件。 参考代码： Private Sub Commandl Click() Dim s As String Open “in5 txt” ForInput As 1 LineInput#1， s Close #1 Text1 Text=s End Sub 步骤 3：按 键运行程序，先单击 “读取数据 ”按钮，接着单击 “首字母大写 ”按钮，最后单击 “存盘 ”按钮。 步骤 4：按要求将文件保存至考生文件夹中。