首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp,其功能是: 1)单击“读数据”按钮,则把考生文件夹下in3.dat文件中的100个按升序排列的整数读入到数组a中,同时显示在Text1文本框中; 2)单击“查找”按钮,则提示用户输入查找的数,并
在考生文件夹下有一个工程文件sjt3.vbp,其功能是: 1)单击“读数据”按钮,则把考生文件夹下in3.dat文件中的100个按升序排列的整数读入到数组a中,同时显示在Text1文本框中; 2)单击“查找”按钮,则提示用户输入查找的数,并
admin
2016-01-31
48
问题
在考生文件夹下有一个工程文件sjt3.vbp,其功能是:
1)单击“读数据”按钮,则把考生文件夹下in3.dat文件中的100个按升序排列的整数读入到数组a中,同时显示在Text1文本框中;
2)单击“查找”按钮,则提示用户输入查找的数,并利用二分法在数组a中查找该数,若查找成功,则在Text2文本框中显示该数在数组中的位置,否则显示查找失败。
提示:二分法查找的思路是,将查找值与有序数组的中间项元素进行比较,若相同则查找结束;否则判断查找值落在数组的上半部分还是下半部分,并继续在那一半的数组中重复上述查找过程。
要求:请将窗体的标题设置为“二分法查找”,并将“查找”命令按钮的Click事件过程中的注释符去掉,把?改为正确内容,以实现上述程序功能。如图3-109所示的是运行时输入数值68的查找结果。
注意:考生不得修改窗体文件中已经存在的控件和程序。最后,程序按原文件名存盘。
选项
答案
审题分析 在本题中首先假设待查找数组的最小下标值为low,最大下标值为high,则数组正中的元素下标m为 (low+high)\2。然后进行判断,如果a(m)的值等于待查找的值,则视为找到,令变量flag的值为1并退出循环:否则若a(m)大于x,则应该在左半部分查找,此时low不变,high的值为m-1;a(m)小于x,则应该在右半部分查找,此时high不变,low的值为m+1。这样一直到low<high为止退出循环,循环结束后判断旗帜变量flag的值,若其为1则意味着找到了待查找数据,否则为没有找到。 操作步骤 步骤1:打开本题工程文件sjt3.vbp,在代码编辑窗口中,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: m=(loW+high)\2 high=m一1 low=m+1 Loop Unti1 low>high If flag=1 Then 步骤2:按要求将文件保存至考生文件夹中。 考点链接 数组定义与操作、Do循环和While循环。
解析
转载请注明原文地址:https://kaotiyun.com/show/buLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮和一个文本框,然后编写命令按钮的Click事件过程。程序运行后,在文本框中输入一串英文字母(不区分大小写),单击命令按钮,程序可找出未在文本框中输入的其他所有英文字母,并以大写方式降序显示到Text1中,例如,若在Tcxt1中输入的是
使用代码从VB6.0列表框删除所有项目,使用的方法是_____。
对话框在关闭之前,不能继续执行应用程序的其他部分,这种对话框属于()。
在窗体上添加一个命令按钮,然后编写如下事件过程:PhvateSubCommanl_Click()Dima(10)AsIntegerDimp(3)AsInteSerk=5Fori=1To10
当标签的标题内容太长,需要根据标题自动调整标签的大小时,应设置标签的()属性为True。
下列程序弹山对话框中按钮的个数为______。MsgBox"确认!",vbAbortRetryIgnore+vbMsgBoxHelpButton+vbQuestion,"提示"
组合框有3种不同的类型,这3种类型是下拉式列表框、简单组合框和下拉式组合框,分别通过把Style属性设置为______来实现。
在文本框中输入字符时,通过()事件过程可以得到字符的ASCII码值。
在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:PrivateSubForm_Load()Text1.Text=""Text1.SetFocusFori=1To9Sum=Sum=iNextiText1.T
随机试题
委托送达
实质教育论者主张,教学的主要任务在于
排卵延迟及不排卵的治疗药物错误的是
土地承租权人提前终止租赁关系的情形不包括()。
单价合同工程量必须以()完成合同工程应予计量的,按照现行国家计量规范规定的工程量计算规则计算得到的工程量确定。
一般会计报表的数据来源有()。
Ifhewouldhaveaskedme,Ishouldhavestayed.
在其他条件不变的情况下,若人们预期利率上升,则会()。
Theproblemswhicharebothurgentandimportantwillbegiven______atthemeeting.
Forsomeeducators,thereisnothingwrongwithfunandgames.AgroupcalledtheEducationArcaderecentlyheldaconferencein
最新回复
(
0
)