1、国家二级 VB机试（上机操作）模拟试卷 255及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml的窗体上画一个名称为 Labell、标题为 “列表框的使用 ”的标签。再画一个名称为 List1的列表框，列表中含有 5个表项，表项内容分别为 “北京 ”、 “山西 ”、 “辽宁 ”、 “浙江 ”和 “广东 ”，并且可以在列表中同时选择多个表项。运行后的窗体如图 2 212所示。 要求：存盘时必须存放在学生文件夹下，工程义件名为sjt1 vbp，窗体文件名为 sjt1 frm。 (2)在名称为 Form1
2、的窗体上画一个名称为 lmagcl的图像框，其高、宽分别为 2000、 3000，且不随图片大小而变化：再画两个命令按钮，标题分别是 “显示图片 ”和 “隐藏图片 ”，名称分别为Cmd1、 Cmd2，如图 2 213所示。需编写两个命令按钮的 Click事件过程，使得当单击 “显示图片 ”按钮时，将当前文件夹下的图片文件 “图片 jpg”显示在图像框中；而如果单击 “隐藏图片 ”按钮，则清除图像框中的图片。 要求：程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下 ，工程文件名为 sjt2 vbp，窗体文件名为 sit2 frm。 二、简单应用题 2 (1)在考生目
3、录下有一个工程文件 sjt3 vbp，包含了所有控件和部分程序。程序运行时，在文奉框中每输入一个字符，则立即判断：若是小写字母，则把它的大写形式显示在标签 Label1中；若是大写字母，则把它的小写形式显示在 Labe11中；若是其他 7符，则把该字符直接显示在 Label1中。输入的字母总数则显示在标签Label2中，如图 2 205所示。 要求：去掉程序中的注释符，把程序中的 ?改为正确的内容。 注意：不得修改已经 存在的程序，最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4 vbp。窗体中有一个图片框，图片框中有一个名称为 Shapel的蓝色圆，如图 2
4、206所示。程序运行时，单击 “开始 ”按钮，圆逐渐变大 (圆心位置不变 )，当圆允满图片框时则变为红色，并开始逐渐缩小，当缩小到初始大小时又变为蓝色，并再次逐渐变大，如此往复。单击 “停止 ”按钮，则停止变化。文件中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的 ?改为止确的内容。提示：程序中的符号常量 bule color表示蓝色的值， red color表示红色的值。 注意：不能修改程序的其他部分和各控件的属性。最后把修改后的文件按原文件名存盘。 三、综合应用题 3 在考生文件夹下有一个工程文件 sjt5 vbp，其窗体上有两个标题分别是 “读数据 ”和 “统计
5、 ”的命令按钮。请画两个标签，其名称分别是 Labell和 Label2，标题分别为“最长译词的长度为 ”和 “以该长度最后一次出现的单词是 ”；再画两个名称分别为Text1和 Text2，初始值为空的文本框，如图 2230所示。程序功能如下： 如果单击 “读数据 ”按钮，则将考生文件 夹下 in5 dat文件的内容读到变量 s中 (此过程已给出 )： 如果单击 “统计 ”按钮，则自动统计 in5 dat文件 (该文件中仅含有字母和空格，而空格是用来分隔不同单词的 )中最长单词的长度，以及 in5 dat中最后一个以该长度出现的单词，并将该单词的长度显示在 Text1文本框内，将该单词显示在
6、Text2文本框内。 “读数据 ”命令按钮的 Click事件过程已经给出，请为 “统计 ”命令按钮编写适当的事件过程，实现上述功能。 注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须进行统计，且必须通过单击窗体有上角的关闭按钮结束程序，否则无成绩。最后，程序按 原文件名存盘。国家二级 VB机试（上机操作）模拟试卷 255答案与解析 一、基本操作题 1 【正确答案】 第 l小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程。 步骤2：在窗休 Forml中加入一个列表框和一个标签，并分别如表 3-111设置它们的相关属性。 步骤 3：按要求将文件保存至考生文件夹
7、中。第 2小题【操作步骤】步骤 1：新建一个 “标准 EXE”工程，如表 3-112在窗体中画出控件并设置其相关属性。 步骤 2：打开代码编辑窗口，编写两个命令按钮的单击事件过程。 参考代码： Private Sub CmdlClick() Imagel Picture=LoadPicture(”图 片 JPg”) End Sub Private Sub Cmd2一 Click() Imagel Picture=LoadPicture() End Sub 步骤 3：按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 第 1小题 【操作步骤】 步骤 1：打升考生文件中的本题上稃文
8、件 sjt3 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： ch=Right$(Textl Text， 1) Labell Caption=ch Label2 Caption=n 步骤 2：按要求将文件保存至考省文件夹中。 第 2小题 【操作步骤】 步骤 1：打开考生文件下的本题工程文件 sjt4 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为止确的内容。 参考代码： Timerl Enabled=True Shapel FillColor=redcolor Shapel Left=Shapel Left+50 Shapel
9、 Top=Shapel Top+50 Shapel FiliColor=bluecolor 步骤 2：按要求将义件保存下考生文件夹中。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 l：打开考生文件夹下的本题工程文件sjt5 vbp，如表 3-121所列在窗体上画出控件并设置它们的相关属性。步骤 2：打开代码编辑窗m存指定何置编写 “统计 ”按钮的单击事件过程。 参考代码： Private Sub Command2 CliCk() 需考生编写 n=Len(S)： t=” Dim Maxlen As Integer For i=1 To n c=Mid(S， i， 1) If C”Then t=tC E1se If Len(t)Max 1en Then Maxfen。 Len(t) Max word=t End If t=” End If Next i If Len(t)Maxlen Then Maxfen。 Len(t) Max word=t End If Textl Text=Max fen Text2 Text=Max word End Sub 步骤 3：按要求将文件保存拿考生文件夹中。 步骤 4：按键运行程序，先单击 “读数据 ”按钮，冉单击 “统计 ”按钮，最后单击窗体右上角的关闭按钮结束程序。
