首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图1-58所示。运行程序,单击“读数据”按钮,文件中的数据被读入字符串变量中并显示在Label2标签中。单击“排序”按钮时,对读入的数据从小到大排序,并将排序结果显示在窗体的Label4控件中。要求:
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图1-58所示。运行程序,单击“读数据”按钮,文件中的数据被读入字符串变量中并显示在Label2标签中。单击“排序”按钮时,对读入的数据从小到大排序,并将排序结果显示在窗体的Label4控件中。要求:
admin
2010-09-02
58
问题
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图1-58所示。运行程序,单击“读数据”按钮,文件中的数据被读入字符串变量中并显示在Label2标签中。单击“排序”按钮时,对读入的数据从小到大排序,并将排序结果显示在窗体的Label4控件中。要求:工程文件中已给出部分程序,“读数据”命令按钮的事件过程不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。请编写“排序”命令按钮的事件过程中的部分程序代码。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,两个命令按钮的事件过程必须至少各执行一次。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Do While Not EOF(1) s=s&Str(a(i)) 步骤2:在代码编辑窗口指定位置编写以下代码: 参考代码: num=UBound(a) For i=1 To num-1 For j=i To num If a(i)>a(j)Then t=a(i) a(i) =a(j) a(j) =t End If Next Next 步骤3:按
键运行程序,先单击“读数据”按钮,再单击“排序”按钮,最后单击窗体右上角的关闭按钮结束程序。 步骤4:按要求将文件保存至考生文件夹中。
解析
冒泡法的核心思路是按顺序让一个数列中的每一个数都与它之后的所有的数逐一进行比较,如果该数大于其后面的数。则把这两个位置的数进行交换。通过这样的循环,最终按照从小到大的顺序排列出该数列。
设计思路:在“读数据”按钮的单击事件中,首先使用Do While当型循环结构从文件中读取全部数据,并以Not EOF(文件号)(非文件结尾)作为循环条件,通过Input#语句将打开文件中的数据逐一读出后赋值给a(i),然后将数组连接起来显示在标签中。
在“排序”按钮的单击事件过程中,原程序利用“冒泡法”对记录数组中的元素从小到大进行排序。
转载请注明原文地址:https://kaotiyun.com/show/EFmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列选项中不属于结构化程序设计方法的是( )。
对如下二叉树进行后序遍历的结果为( )。
两个或两个以上的模块之间关联的紧密程度称为( )。
复选框通过【】来监听ItemEvent事件。
在Java语言中的实数,如数字后没有任何字母,计算机默认其为【】类型。
在文件类提供的方法中,用于创建目录的方法是( )。
创建一个10行40列的文本区域tal的正确语句是______。
下列不是事件处理机制角色的是( )。
下面不属于软件工程3个要素的是______。
随机试题
对于腮腺区肿物,哪种检查是不正确的
患者,女性,20岁,8天前因受凉后出现体温升高,6天前出现咳嗽、黄痰。入院查体:体温39.8℃,白细胞12×109/L,中性粒细胞89%,可闻支气管呼吸音和少许吸气相细湿啰音,心脏和腹部查体无异常。若患者出现耐药肺炎链球菌,可作为替代药物的是()。
下列选项不属于单相流洁净室的送风形式的是()。
除专用合同条款另有约定外,发包人应在开工后28天内预付安全文明施工费总额的(),其余部分与进度款同期支付。
学习与教学的要素包括学生、教师、教学内容、教学媒体和______。
在冬季,人们往往容易鼻子出血,因而常常在房间的地上洒一些水,或在室内放一盆清水、挂一些湿毛巾等。对以上做法最合理的解释是()。
_______是德国同时也是欧洲文学史上第一部市民悲剧,德国市民悲剧的代表作是_______。
路由器收到一个IP数据报,其目标地址为202.100.117.4,与该地址匹配的子网是()。
给定程序中,函数fun的功能是:有N×N矩阵,根据给定的m(m<=)值,将每行元素中的值均右移m个位置,左边置为0。例如,N=3,m=2,有下列矩阵123456789程
TheBuildingofthePyramidsTheoldeststonebuildingsintheworldarethepyramids.【46】.Thereareovereightypercentof
最新回复
(
0
)