1、国家二级 VB机试(上机操作)模拟试卷 84及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml的窗体上画 1个命令按钮,其名称为 C1,标题为 “等级考试 ”;再画 1个文本框,名称为 T1,如图 3-107(a)所示。请编写适当的事件过程,使程序运行后,一旦文本框 rfj的信息有任何变化或输入任何信息,则命令按钮消失,并使命令按钮的标题站在文本框中显示出来,如图 3 107(b)所示。注意:存盘时,将文件保存至考生文件夹下,窗体文件名 为 sitl frm,工程文件名为 sitl vbp。 (2)
2、在名称为Foml、标题为 “菜单演示 ”的窗体上画一个名称为 Labell、标题为窄的标签;再建立一个菜单,各菜单项的属性设置见下表。窗体外观如图 3一 108(a)所示。请编写适当的程序,使得选中 “输出窗体标题 ”菜单项时,就在标签中显示窗体标题;选中 “输出当前时间 ”菜单项时,在标签中显示当前系统时间 (如图 3 108(b)所示 )。要求程序中不得使用变量,每个事件过程中只能写一条语句。注意:存盘时,将文件保存至考生文件夹下,窗体文件名为sit2 frm,工程文件 名为 sit2 vbp。二、简单应用题 2 (1)在考生文件夹下有一个工程文件 sit3 vbp,相应的窗体文件为 si
3、t3 frm。在窗体上有一个名称为 Commandl、标题为 “计算 ”的命令按钮;两个水平滚动条,名称分别为 Hscrol11和 Hscrol12,其 Max属性均为 100, Min属性均为 1;四个标签,名称分别为 Labe11、 Labe12、 Labe13和 Labe14,标题分别为 “运算数 1”、 “运算数 2”、 “运算结果 ”和空白;此外还有一个包含四个单选按钮的控件数组,名称为 Optionl,标题分别为 “+”、 “ ”、 “*和 “ ”,如图 3 75(a)所示。程序运行后,移动两个滚动条中的滚动框,用滚动条的当前值作为运算数,如果选中一个单选按钮,然后单击计算按钮,相
4、应的计算结果将显示在 Label4中,程序运行情况如图 3 75所示。这个程序不完整,请把它补充完整,并能正确运行。要求:去掉程序中的注释符,把程序中的 ?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分,也不能修改控件的属性。最后用原来的文件名保存工程文件和窗体文件。 (2)在考生文件夹下有一个工程文件 sit4 vbp,相应的窗体文件为 sjt4 frm。在窗体上有一个命令按钮,其名称为 Commandl,标题为 “输入显示 ”;此外还有一个文本框,其名称为 Text1,初始内容为空白。程序的功能是,程序运行后,单击命令按钮,显示输入对话框,在对话框巾输入某个月份的数值 (1 1
5、2),然后单击 “确定 ”按钮,即可在文本框中输出该月份所在的季节。例如输入 5,将输出 “5月份是夏季 ”,如图 3 76所示。程序不完整,请补充完整。要求:去掉程序中的注释符,把程序中的 ?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体 文件。 三、综合应用题 3 在考生文件夹下有一个工程文件 sit5 vbp,窗口有 2个名称分别为 Commandl和Command2、标题分别为 “读数据 ”和 “排序 ”的命令按钮,有 2个标题分别为 “数组A”和 “数组 B”的标签。请将窗体标题设置为 “完全平方数排序 ”;再画 2个名称分别为 Te
6、xt1和 Text2、初始内容都为窄的文本框,并且可多行显示,有垂直滚动条,如图 3 47所示。程序功能如下: 1)单击 “读数据 ”按钮,则把考生文件夹下in5 dat文件中的 100个正整数读入数组 A,并将它们显示在 Text1文本框中; 2)单击 “排序 ”按钮,则首先将这 100个数中的所有完全 平方数放入数组 B中,并将它们按降序排列显示在 Text2文本框中。提示:一个整数若是另一个整数的平方,那么它就是完全平方数。如 144=122,所以 144就是一个完全平方数。要求:去掉注释符,把 ?改为正确内容,并添加代码使得 “排序 ”命令按钮的 Click事件过程可以实现上述功能。提
7、示: Sort过程可以把求出的完全平方数进行排序,可以直接调用。注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行 “排序 ”,且须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。 国家 二级 VB机试(上机操作)模拟试卷 84答案与解析 一、基本操作题 1 【正确答案】 第 1小题 【操作步骤】 步骤 1:新建一个 “标准 EXE”工程,按要求画出控件并设置相应属性。 步骤 2:打开代码编辑窗口,编写文本框的 Change事件过程。 参考代码: Private Sub T1_Change() C1 Visible=False T1 Text=
8、C1 Caption End Sub 步骤 3:按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1:新 建一个 “标准 EXE”工程,选择【工具】 【菜单编辑器】命令,打开菜单设计器,按要求设置建立菜单项。 步骤 2:打开代码编辑窗口,编写两个底层菜单命令的单击事件过程。 参考代码: Private Sub Clock Click() Labell Caption=Time End Sub Private Sub Title Click() Labell Calotion=Forml Caption End Sub 步骤 3:按要求将文件保存至考生文件夹中。 二、简单应用题
9、2 【正确答案】 第 1小题 【操作步骤】 步骤 1:打开考生文件夹中的本题工程文件 03 vbp,在代码编辑窗口,去掉程序中的注释符 “”,将问号 “?”改为正确的内容。 参考代码: If Optionl(i)=True Then Select Case opt Label4 Caption=Str(Hsbl Value) “” opt Str(Hsb2 Value) “=” Str(Result) 步骤 2:按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步 骤 1:打开考生文件夹中的本题工程文件 sjt4 vbp,在代码编辑窗口,去掉程序中的注释符 “”,将问号 “?”改为正确的内容。 参考代码: Loop Until n0 And n0 Then d=Sqr(a(k) If Int(d) =d Then n=n+1 b(n)=a(k) EndIf EndIf Next 考生编写代码结束 步骤 2:在代码编辑窗口中,去掉程序中的注释符 “”,将问号 “?”改为正确的内容。 参考代码: Call sort(b, n) 步骤 3:按 键运行程序,单击 “读数据 ”按钮,然后单击 “排序 ”按钮,最后单击窗体右上角的关闭按钮结束程序。 步骤 4:按要求将文件保存至考生文件夹中。
copyright@ 2008-2019 麦多课文库(www.mydoc123.com)网站版权所有
备案/许可证编号:苏ICP备17064731号-1