2. 计算机
  3. (1)在考生文件夹中有工程文件sjt3．vbp，其中的窗体如图3—162所示。程序刚运行时，会生成一个有10个元素的整型数组。若选中“查找最大值”(或“查找最小值”)单选按钮，再单击“查找”按钮，则找出数组中的最大值(或最小值)，并显示在标签Label2中

(1)在考生文件夹中有工程文件sjt3．vbp，其中的窗体如图3—162所示。程序刚运行时，会生成一个有10个元素的整型数组。若选中“查找最大值”(或“查找最小值”)单选按钮，再单击“查找”按钮，则找出数组中的最大值(或最小值)，并显示在标签Label2中

admin2017-03-27  27
问题 (1)在考生文件夹中有工程文件sjt3．vbp，其中的窗体如图3—162所示。程序刚运行时，会生成一个有10个元素的整型数组。若选中“查找最大值”(或“查找最小值”)单选按钮，再单击“查找”按钮，则找出数组中的最大值(或最小值)，并显示在标签Label2中。
请去掉程序中的注释符，把程序中的“?”改为正确的内容。
注意：考生不得修改窗体文件中已经存在的程序。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹中有一个工程文件sjt4．vbp。窗体上已有控件，如图3．163所示。请在属性窗口中将List1设置为可以多项选择(允许使用Shift键或Ctrl键进行选择)列表项。要求：双击List1中的某一项时，该项目被添加到List2中，同时在List1中清除该项目。若单击“＞＞”按钮，List1中所有的项目显示在List2中(List2中已有项目不变)，List1中的内容不变。
要求：按照题目要求设置控件属性，去掉程序中的注释符，把程序中的“?”改为正确的内容。
注意：不得修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
选项
答案第1小题 步骤1：打开考生文件夹下的工程文件sjt3．vbp，在代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。 参考代码： If Option1．Value=True Then If a(i)＞=x Then x=a(i) End If Elself a(i)＜y Then y=a(i) End If 步骤2：按要求将文件保存至考生文件夹中。 第2小题 步骤1：打开考生文件夹中的本题工程文件sjt4．vbp，代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。 参考代码： L2．AddItem L1．List(L1．ListIndex) L1．RemoveItem L1．ListIndex For i=0To List1．ListCount-1 Call MoveItem(List1，List2) 步骤2：按要求将文件保存至考生文件夹中。
解析 第1小题：根据题同要求，在“查找”按钮的单击事件过程中，预设两个变量x和y，分别是数组的最大值和最小值；接下来判断单选按钮数组中哪个单选按钮被选中，如果选中了最大值按钮，则用循环依次比较a(i)和x的值，如果a(i)＞x则将a(i)的值放入x。以此类推选中最小值按钮时的处理过程与之类似。
第2小题：实现本题从列表框List1到List2的移出功能，其实就是利用列表框的AddItem方法和RemoveItem方法添加或删除列表框中的项目。由题中源代码可知，当双击列表框Ljst1中的某项时，则调用Moveltem过程(参数应为控件List1和List2)将列表框List1中当前项的内容(索引号为ListIndex)用AddItem方法添加到列表框List2中，同时用RemoveItem方法从列表框List1中删除该项。当单击“＞＞”按钮时，则调用MoveAll过程通过For循环(循环变量终值为List1．ListCount-1)将列表框List1中的各项逐一添加到列表框。List2中。
转载请注明原文地址:https://kaotiyun.com/show/mhGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)