1、国家二级 VB 机试(上机操作)-试卷 22 及答案解析(总分:6.00,做题时间:90 分钟)一、基本操作题(总题数:1,分数:2.00)1.请根据以下各小题的要求设汁 Visua1 Basic 应用程序(包括界面和代码)。 (1)在名称为 Forml、标题为“鼠标光标形状”的窗体上画一个名称为 Text1 的文本框。请通过属性窗口设置适当属性,使得程序运行时,鼠标在文本框中时,鼠标光标为箭头(Arrow)形状;在窗体中其他位置处,鼠标光标为十字(Cross)形状。 注意:存盘时必须存放在考生文件夹下,工程义件名为 sjtlvbp,窗体文件名为 sjtlfrm。 (2)在名称为 Forml
2、的窗体上画两个标签,名称分别为 Label1、Label2,标题分别为“扦始位置”、“选中的字符数”;画三个文奉框,名称分别为 Text1、Text2、Text3,再画一个名称为 Commandl,标题为“显示选中信息”的命令按钮。程序运行时,存 Text1 中输入若干字符,并用鼠标选中一些字符后,单击“显示选中信息”按钮,则把选中的第一个字符的顺序号显示在 Text2 中,选中的字符个数显示在 Text3中,如图 2139 所示。 要求:画出所有摔什,编写命令按钮的 Click 事件过程。 注意:要求程序中小得使用变量,事什过程中只能写两条语句,分别用于显示第一个字符的顺序号和显示选中的字符
3、个数。存龠时必须存放在考生文件夹下,工程文件名为 sjt2vbp,窗体文件名为 sjt2frm。 (分数:2.00)_二、简单应用题(总题数:1,分数:2.00)2.(1)在考生文件夹下有一个工程文件 sjt3vbp,其功能是:1)单击“读数据”按钮,则把考生文件夹下 in3dat 文件中的 100 个按升序排列的整数读入到数组 a 中,同时显示在 Text1 文本框中; 2)单击“查找”按钮,则提示用户输入查找的数,并利用二分法存数组 a 中查找该数,若查找成功,则在 Text2文本框中显示该数存数组中的位置,否则显示查找失败。 提示:二分法查找的思路是,将金找值与有序数组的中间项元素进行比
4、较,若相同则查找结束;否则判断查找值落在数组的上半部分还是下半部分,并继续在那一半的数组中重复上述查找过程。 要求:请将窗体的标题设置为“二分法查找”,并将“查找”命令按钮的 Click 事件过程中的注释符去掉,把?改为正确内容,以实现上述程序功能。如图 2109 所示的是运行时输入数值 68 的查找结果。 注意:考生不得修改窗体文件中已经存在的控件和程序。最后,程序按原文件名存盘。 (2)在考生文件夹下有一个上程义件 sjt4vbp。运行程序,按下鼠标左键,并在窗体上拖动鼠标时,沿鼠标移动可在窗体上画出一系列圆,如图 2110 所示。给出的程序不完整,要求去掉程序中的注释符,把程序中的?改为
5、止确的内容。 (分数:2.00)_三、综合应用题(总题数:1,分数:2.00)3.在考生文件夹下有一个工程文件 sit5vbp。其窗体中有一个名称为 Text1 的文本框数组,下标从 0 开始。程序运行时,单击“产生随机数”按钮。就会产生 10 个 3 位数的随机数,并放入 Textl 数组中,如图 211 5(a)所示;单击“重排数据”按钮,将把 Text1 中的奇数移到前而,偶数移到后面,如图2115(b)所示。文件中已经给出了所有控件和部分程序。 (分数:2.00)_国家二级 VB 机试(上机操作)-试卷 22 答案解析(总分:6.00,做题时间:90 分钟)一、基本操作题(总题数:1,
6、分数:2.00)1.请根据以下各小题的要求设汁 Visua1 Basic 应用程序(包括界面和代码)。 (1)在名称为 Forml、标题为“鼠标光标形状”的窗体上画一个名称为 Text1 的文本框。请通过属性窗口设置适当属性,使得程序运行时,鼠标在文本框中时,鼠标光标为箭头(Arrow)形状;在窗体中其他位置处,鼠标光标为十字(Cross)形状。 注意:存盘时必须存放在考生文件夹下,工程义件名为 sjtlvbp,窗体文件名为 sjtlfrm。 (2)在名称为 Forml 的窗体上画两个标签,名称分别为 Label1、Label2,标题分别为“扦始位置”、“选中的字符数”;画三个文奉框,名称分别
7、为 Text1、Text2、Text3,再画一个名称为 Commandl,标题为“显示选中信息”的命令按钮。程序运行时,存 Text1 中输入若干字符,并用鼠标选中一些字符后,单击“显示选中信息”按钮,则把选中的第一个字符的顺序号显示在 Text2 中,选中的字符个数显示在 Text3中,如图 2139 所示。 要求:画出所有摔什,编写命令按钮的 Click 事件过程。 注意:要求程序中小得使用变量,事什过程中只能写两条语句,分别用于显示第一个字符的顺序号和显示选中的字符个数。存龠时必须存放在考生文件夹下,工程文件名为 sjt2vbp,窗体文件名为 sjt2frm。 (分数:2.00)_正确答
8、案:(正确答案:第 1 小题 【操作步骤】 步骤 1:新建“标准 EXE”工程,在窗体 FormI 中画一个文本框,如表 373 设置文本框及窗体属性。 步骤 2:按要求将文件保存至考生文件炎中。 第 2 小题 【操作步骤】 步骤 1:新建一个“标准 EXE”工程,如表 374 在窗体中画出控件并设置其相关属性。)解析:二、简单应用题(总题数:1,分数:2.00)2.(1)在考生文件夹下有一个工程文件 sjt3vbp,其功能是:1)单击“读数据”按钮,则把考生文件夹下 in3dat 文件中的 100 个按升序排列的整数读入到数组 a 中,同时显示在 Text1 文本框中; 2)单击“查找”按钮
9、,则提示用户输入查找的数,并利用二分法存数组 a 中查找该数,若查找成功,则在 Text2文本框中显示该数存数组中的位置,否则显示查找失败。 提示:二分法查找的思路是,将金找值与有序数组的中间项元素进行比较,若相同则查找结束;否则判断查找值落在数组的上半部分还是下半部分,并继续在那一半的数组中重复上述查找过程。 要求:请将窗体的标题设置为“二分法查找”,并将“查找”命令按钮的 Click 事件过程中的注释符去掉,把?改为正确内容,以实现上述程序功能。如图 2109 所示的是运行时输入数值 68 的查找结果。 注意:考生不得修改窗体文件中已经存在的控件和程序。最后,程序按原文件名存盘。 (2)在
10、考生文件夹下有一个上程义件 sjt4vbp。运行程序,按下鼠标左键,并在窗体上拖动鼠标时,沿鼠标移动可在窗体上画出一系列圆,如图 2110 所示。给出的程序不完整,要求去掉程序中的注释符,把程序中的?改为止确的内容。 (分数:2.00)_正确答案:(正确答案:第 1 小题 【操作步骤】 步骤 1:打开本题工程文件 sjt3vbp,在代码编辑窗口中,去掉程序中的注释符“”,将问号“?”改为正确的内容。 参考代码: m=(low+high)2 high=m1 low=m+1 Loop Until lowhigh If flag=1 Then 步骤 2:按要求将文件保存至考生文件夹中。第 2 小题
11、【操作步骤】 步骤 1:打开本题工程文件 sjt4vbp,在代码编辑窗口中,去掉程序中的注释符“”,将问号“?”改为正确的内容。 参考代码: Dim Flag As Boolean Private Sub FormMouseMove(Button AsInteger, Shift As Integer I X As Single tY As Single) Circle(X,Y),300 Flag=False 步骤 2:按要求将文件保存至考生文件夹中。)解析:三、综合应用题(总题数:1,分数:2.00)3.在考生文件夹下有一个工程文件 sit5vbp。其窗体中有一个名称为 Text1 的文本框数组,下标从 0 开始。程序运行时,单击“产生随机数”按钮。就会产生 10 个 3 位数的随机数,并放入 Textl 数组中,如图 211 5(a)所示;单击“重排数据”按钮,将把 Text1 中的奇数移到前而,偶数移到后面,如图2115(b)所示。文件中已经给出了所有控件和部分程序。 (分数:2.00)_正确答案:(正确答案:【操作步骤】 步骤 1:打开考生文件中的本题工程文件 sit5vbp,在代码编辑窗口,去掉程序中的注释符“”,将问号“?”改为正确的内容。 参考代码: j=9 temp=Textl(j) While(i解析: