1、国家二级 VB机试（上机操作）模拟试卷 239及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml的窗体上画一个图片框，名称为 Pl，高为 1800，宽为 1700，通过属性窗口把图形文件 picl bmp放到图片框中 (如图 2 193所示 )。注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl vbp，窗体文件名为 sjt1 frm。 (2)在名称为 Forml的窗体上画两个文奉框，名称分别为 Text1、 Text2，都显示垂直 滚动条和水平滚动条，都可以显示多行文本；再画一个命令按钮，名
2、称为 C1，标题为 “复制 ”(如图 2 194所示 )。请编写适当的事件过程，使得存运行时，在 Textl中输入文本后，单击 “复制 ”按钮，就把Text1中的文本全部复制到 Text2中。程序中不得使用任何变量。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sit2 vbp，窗体文件名为 sit2,frm。二、简单应用题 2 (1)在考生文件夹下有一个工程文件 sjt3 vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击 “统计 ”按钮，分别 统计输入字符串中大写字母、小写宁母及数字字符的个数，并将统计结果分别显示在标签控件数组 x中，如图2 132所示。在给出的窗体
3、文件夹中已经添加了全部控件，但程序不完整。 要求：去掉程序中的注释符，把程序中的 ?改为正确的内容。 注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。(2)考生文件夹下的 lT程文件 sit4 vbp中有两个名称分别为 List1、 List2的列表框控件，两个名称分别为Commandl、 Command2，标题分别为 “”、 “”按钮，将 Listl中的表项添加到List2中，同时将 Listl清空；单击 “ 三、综合应用题 3 在考生文件夹下有一个工程文件 sjt5 vbp，相应的窗体文件为 sjt5 frm。窗体外观如图 2 5(a)所示。三个命令按钮的名称分别
4、为 Command1、 Command2和Command3，标题分别为 “读取数据 ”、 “首字母大写 ”和 “存盘 ”。程序运行后，如果单击 “读取数据 ”命令按钮，则读取考生文件夹下 in5 txt中的全部文本 (文本中的单词与单词之间或标点符号与单词之间均用一个空格分开 )，并在文本框中显示出来。文本内容如下： TuckeddeepwithinthepromisesandpoliciesofhisStateoftheUnionaddress,PresidentBushutteredthr_ccwordsthatspeakvolumesaboutWashingtonsparalysisin
5、addr、cssingtheplightoflhefortymillionAmericanswholackhealthinsurance InbetweenhisdiscourseonMedicareandhissupportforalow-incomehealthcaretaxcredit,Bushcalledforsomethingcalledassociationhealthplans 如果单击 “首字母大写 ”命令按钮，则将文本框中每个单词的第一个字母变为大写字母(如果原来已是大写字母则不改变 )，并在文本框中显示出来，如图 2 5(b)所示；如果单击 “存盘 ”命令按钮，则把文本框中
6、的内容 (首字母大写后 )保存到考生文件夹下的文件 out5 txt中。窗体文件中已给出了部分程序，请把它补充完整，使其实现上述功能。 要求： 1)编写 “读取数据 ”命令按钮的 Click事件过程。 2)去掉 “首字母大写 ”命令按钮和 “存 盘 ”命令按钮事件过程中的注释符，把程序中的 ?改为正确的内容，使其能正确运行。 3)用原来的文件名保存工程文件和窗体文件。国家二级 VB机试（上机操作）模拟试卷 239答案与解析 一、基本操作题 1 【正确答案】 第 1小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程如表3-101在窗体中画出控件并设置其相关属性。步骤 2：按要求将文件保
7、存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程。 步骤 2：在窗体 Forml中加入两个文本框和一个命令按钮，并分别设置它们的相关属 性，其属性及值如表 3-102。 步骤3：打开代码编辑窗口，编写命令按钮的单击事件过程。 参考代码： Private Sub C1一 Click() Text2 Text=Textl Text End Sub 步骤 4：按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 第 1小题 【操作步骤】 步骤 1：打开考生文件中的本题工程文件 sjt3 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?
8、”改为正确的内容。 参考代码： n=Len(Textl Text) b=AsC(Mid(S， i， 1) Select Case b For i=0 To 2 x(i)=a(i) 步骤 2：按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1：打开考生文件中的本题工程文件 sjt4 vbp，通过 Listl列表框的 List属性添加四个项同：文本框、标签、命令按钮、单选按钮。 步骤 2：在代码编辑窗 L，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： For i=0 To La ListCount一 1 Lb AddItem La List(i) Next
9、 La Clear 步骤 3：按要求将文件保存至考生文件夹中。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1：打开考生文件夹中的工程文件 sjt5 vbp，在代码编辑窗口中，去掉程序中的注释符 “*”，将问号 “?”改为正确的内容。 参考代码： ch=Mid(OidSen， i， 1) newSen=newSen ch Write#1， Textl Text 步骤 2：编写 “读取数据 ”命令按钮的单击事件。 参考代码： Private Sub CommandlClick() Dim S As String Open”in5 txt”For Input As 1 Line Input： l1， S Close#1 Textl Text=S End Sub 步骤 3：按 键运行程序，先单击 “读取数据 ”按钮，接着单击 “首字母火写 ”按钮，最后单击 “存盘 ”按钮。 步骤 4：按要求将文件保存至考生文件夹中。
