1、国家二级 VB 机试(上机操作)-试卷 85 及答案解析(总分:6.00,做题时间:90 分钟)一、基本操作题(总题数:1,分数:2.00)1.请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。(1)在名称为 Forml、标题为“列表框练习”的窗体上画一个名称为 Listl 的列表框,表项内容依次输入 XXX、ddd、mmm 和 aaa,且以宋体 14 号字显示表项内容,如图 3-93(a)所示。最后设置相应属性,使运行后列表框中的表项按字母升序方式排列,如图 393(b)所示。 注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjtlfrm,工程文件名为
2、 sjtlvbp。(2)在名称为 Forml 的窗体上,画一个名称为 Labell 的标签,其标题为“计算机等级考试”,字体为宋体,字号为 12 号,且能根据标题内容自动调整标签的大小。再画两个名称分别为 Commandl、Command2,标题分别为“缩小”和“还原”的命令按钮(如图 394 所示)。(分数:2.00)_二、简单应用题(总题数:1,分数:2.00)2.(1)在考生文件夹下有一个工程文件 vbsi3vbp,相应的窗体文件名为 vbsi3frm。在窗体上有一个命令按钮,其名称为 cmdAdd,标题为“添加”;有一个文本框,名称为 txtSentense,初始内容为空白;有一个列表
3、框,名称为 lstWord。程序运行后,在文本框中输入一个英文句子(由多个单词组成,各单词之间用一个窄格分开),然后单击命令按钮,程序将把该英文句子分解为单词,并把每个单词作为一个项目添加到列表框巾,如图 328 所示。该程序不完整,请把它补充完整。 要求:去掉程序中的注释符,把程序中的“?”改为正确的内容,使其能正确运行,但不能修改稃序中的其他部分。最后把修改后的文件按原文件名存盘。 程序源码: Private Sub cmdAdd Click() Dim S1 As String, S2 As String DimI1 As Inteqer S1=? I1=1 Do Do While Mid(s1, I 1, 1) ? AndI1? AndI1“”And I 1 a(j) Then t=a(i) a(i)=a(j) a(j)=t End If Next Next 步骤 3:按键运行程序,先单击“读数据”按钮,再单击“排序”按钮,最后单击窗体右上角的关闭按钮结束程序。 步骤 4:按要求将文件保存至考生文件夹中。)解析: