首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹下有一个工程文件sjt3.vbp,其窗体上有1个名称为Text1的控件数组;一个标题为"排序"的命令按钮。程序运行时,在文本框数组中输入8个整数,如图3—29(a)所示;然后单击”排序”按钮,则8个整数按降序排序,如图3—29(b)所示。
(1)考生文件夹下有一个工程文件sjt3.vbp,其窗体上有1个名称为Text1的控件数组;一个标题为"排序"的命令按钮。程序运行时,在文本框数组中输入8个整数,如图3—29(a)所示;然后单击”排序”按钮,则8个整数按降序排序,如图3—29(b)所示。
admin
2017-03-27
59
问题
(1)考生文件夹下有一个工程文件sjt3.vbp,其窗体上有1个名称为Text1的控件数组;一个标题为"排序"的命令按钮。程序运行时,在文本框数组中输入8个整数,如图3—29(a)所示;然后单击”排序”按钮,则8个整数按降序排序,如图3—29(b)所示。
在给出的窗体文件中已经有了全部控件,但程序不完整。请将事件过程中的注释符去掉,把“?”改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。
(2)在考生文件夹下有工程文件sjt4.vbp。其窗体界面如图3—30所示,可以实现以下功能:
“添加项目”按钮可以把在组合框编辑区中输入的新项目添加到组合框列表中,但不能添加重复项目;“删除项目”按钮从列表中删除选中的项目;“添加爱好”按钮把组合框编辑区中的内容追加到下面的文本框原有内容之后;“清除爱好”按钮清除该文本框内容。
在给出的窗体文件中已经有了全部控件,但程序不完整。请将事件过程中的注释符去掉,把“?”改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。
选项
答案
第1小题 步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为止确的内容。 参考代码: k=i For]]j=i+1To7 If]]Val(Text1(j).Text)> Val(Text1(k).Text)Then Text1(k).Text=j 步骤2:按要求将文件保存至考生文件夹中。 第2小题 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: If Combo1.Text=Combo1.List(k)Then Combo1.AddItem Combo1.Text Combo1.RemoveItem Combo1.ListIndex Text1.Text=Text1.Text&" "& Combo1.Text Text1.Text=" " 步骤2:按要求将文件保存至考生文件夹中。
解析
第1小题:题目要求对一组数据进行排序,分析代码可知程序使用的是数据排序可以使用多种排序方法,比如选择法排序,其方法是:
(1)从n个数的数序列中选出最大的数,与第1个数交换位置:除第1个数外,其余n-1个数再按(1)的方法选出次大的数,与第2个数交换位置;
(3)重复(1)步n-1遍,最后构成递减序列。
第一个“?”处是补充k的值,根据选择发排序原理,变量k记录最大数的位置,从外层循环的起始位置开始,因此k的值应为i;第二个“?”处是补充内存循环的结束条件,外层循环7次,找出7个最大的数,内层循环从i+1的位置开始,直到结束;第三个“?”处是补充判断条件,如果Text1(k).Text的值比Text1(i).Text要小的话,那么更新k的值;最后一个“?”处是交换两个元素的值。
第2小题:题目要求在组合框里面添加数据,从组合框获取数据显示在文本框,主要是考查组合框的常用方法和属性。
第一个“?”处是判断组合框编辑区的内容是否和组合框元素值一样,获取组合框的某个元素值是一List方法;第二个“?”处是如果编辑区内容不重复,添加到组合框列表里面,使用AddItem方法:第三个“?”处是删除列表中选中的项目,使用RemoveItem方法:第三个“?”处是把列表框选中的项目添加到文本框里面:最后一个“?”处是清空文本框的内容。
转载请注明原文地址:https://kaotiyun.com/show/ThGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
关于结构化程序设计原则和方法的描述错误的是()。
窗体上命令按钮Commandl的事件过程如下:PrivateSubCommand1_Click()DimtotalAsIntegertotal=s(1)+s(2)PrinttotalEndSubPrivateFunctions
执行下面的程序段后,S的值为【】。s=5Fori=2.6To4.9Step0.6s=s+1Nexti
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程: PrivateSubCommand1_Click() n=Val(Text1.Text) Fori=2Ton Forj
有如下程序:FunctionF(aAsInteger)b=0StaticCb=b+1c=c+2F=a+b+cEndFunctio
VisualBasic根据计算机访问文件的方式将文件分成三类,其中不包括______。
下列程序的功能是;将数据1,2,…,8写入顺序文件Num.txt中,请选择正确的程序段()。PrivateSubForm_Click()DimiAsIntegerOpen"Num.txt"ForOut
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dima(1To10)Dimp(1To3)k=5Fori=1To10a(i)=iNextiFori=1To3p
随机试题
女性,35岁,劳累时心悸、气短,休息后可缓解,反复双下肢轻度水肿一年。半月前因受凉后咳嗽,咳白色泡沫痰及少许黏痰,同时伴心悸、气短、不能平卧来急诊。体检:呼吸22次/分,口唇发绀,心率120次/分,心律绝对不规则,心尖区闻及SM3/6级杂音和DM,双肺对称
我国列入OTC分类管理的药品是
血细胞比容概念正确的是
建设工程项目实施阶段管理工作的主要任务是( )。
汉代政论家王充在《论衡》中说:“知屋漏者在宇下,知政失者在草野,知经误者在诸子”这句话蕴含的哲理是()。
清朝中央政府对西藏行使主权的标志是()。
水门事件
下列不是影响态度形成的社会因素的是()
[*]
窗体上有一个名称为Command1的命令按钮,有程序如下:OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger’第1个ForFori=1To1
最新回复
(
0
)