首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(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
2019-03-14
115
问题
(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+1 To 7 If Val(Text1(j).Text) > Val(Text1(k).Text) Then Text1(k).Text=j 步骤2:按要求将文件保存至考生文件夹中。 (2)步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: If Combol.Text=Combol.List(k)Then Combol.AddItem Combol.Text Combol.RemoveItem Combol.ListIndex Text1.Text=Text1.Text & " " & Combol.Text Text1.Text="" 步骤2:按要求将文件保存至考生文件夹中。
解析
(1)题目要求对一组数据进行排序,分析代码可知程序使用的是数据排序可以使用多种排序方法,比如选择法排序,其方法是:(1)从n个数的数序列中选出最大的数,与第1个数交换位置;除第1个数外,其余n-1个数再按(1)的方法选出次大的数,与第2个数交换位置:(3)重复(1)步n-1遍,最后构成递减序列。
第一个“?”处是补充k的值,根据选择发排序原理,变量k记录最大数的位置,从外层循环的起始位置开始,因此k的值应为i:第二个“?”处是补充内存循环的结束条件,外层循环7次,找出7个最大的数,内层循环从i+l的位置开始,直到结束;第三个“?”处是补充判断条件,如果Text1(k).Text的值比Text1(j).Text要小的话,那么更新k的值;最后一个“?”处是交换两个元素的值。
(2)题目要求在组合框里面添加数据,从组合框获取数据显示在文本框,主要是考查组合框的常用方法和属性。
第一个“?”处是判断组合框编辑区的内容是否和组合框元素值一样,获取组合框的某个元素值是一List方法;第二个“?”处是如果编辑区内容不重复,添加到组合框列表里面,使用Addltem方法;第三个“?”处是删除列表中选中的项目,使用Removeltem方法;第三个“?”处是把列表框选中的项目添加到文本框里面;最后一个“?”处是清空文本框的内容。
转载请注明原文地址:https://www.kaotiyun.com/show/17Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名为Commandl的命令按钮,并有下面的程序:PrivateSubCommandl_Click()Dimarr(5)AsIntegerFork=1To5flit(k)=kNext
在窗体上画一个组合框,一个命令按钮和一个文本框,其名称分别为Combo1,Command1和Text1,然后编写如下事件过程:PrivateSubForm_Load() Combo1.AddItem"AAAAA" Combo1.AddI
定义无符号整数类为UInt,下面可以作为类UInt实例化值的是( )。
下面叙述中错误的是
有数据定义语句:Dima,bAsIntegerDimx%,yasInteger执行语句后,不是整型变量的是
若在窗体模块的声明部分声明了如下自定义类型和数组PrivateTyperecCodeAsInteger:CaptionAsStringEndTypeDimarr(5)Asrec则下面的输出语句中正确的是
假定有以下函数过程:FunctionFun(SAsString)AsStringDimslAsStringFori=1ToLen(S)sl=LCase(Mid(S,i,1))+slNextiFun=slEndFuncti
在关系模型中,每一个二维表称为一个
下面的数写成普通十进制数是()。8.6787E+8
随机试题
美国对外投资进行安全审查时拥有最终决定权的是【】
女,30岁,头晕、心悸、齿龈出血、月经量过多半年余,曾在当地服止血药治疗未愈。近1周因呼吸道感染伴发热、齿龈出血加重来门诊检查,诊为再生障碍性贫血。病人入院后因高热出现抽搐,此时最适宜的降温措施是()。
一个好的战略目标通常具有的特征包括()。
某综合性医院选址在城市中心地带,设有床位300张,设有放射科(X光机、CT机)、传染病区等23个诊疗科室,员工400人。辅助生活设施有卫生、办公室、洗衣房等。公用工程中有1台DZL2-1.25-III型燃煤锅炉。配XZD-2型单筒旋风除尘器,烟囱高25m,
施工质量事故处理的基本方法有()
17世纪意大利著名艺术家()在雕塑、建筑领域均有杰出成就。
情境教学法的语言理论基础是()理论。
较早建立近代警察制度的国家是()。
在Windows文件系统中,(23)是不合法的文件名,一个完整的文件名由(24)组成。
FluandHowNottoCatchItThiswinter,inofficesandworkplacesthroughoutthecountry,peopleareatriskofbecominga
最新回复
(
0
)