首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个名称为Text1的文本框数组,下标从0开始。程序运行时,单击“产生随机数”按钮,就会产生10个3位数的随机数,并放入Text1数组中,如图3-115(a)所示;单击“重排数据”按钮,将把Text1
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个名称为Text1的文本框数组,下标从0开始。程序运行时,单击“产生随机数”按钮,就会产生10个3位数的随机数,并放入Text1数组中,如图3-115(a)所示;单击“重排数据”按钮,将把Text1
admin
2019-05-14
53
问题
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个名称为Text1的文本框数组,下标从0开始。程序运行时,单击“产生随机数”按钮,就会产生10个3位数的随机数,并放入Text1数组中,如图3-115(a)所示;单击“重排数据”按钮,将把Text1中的奇数移到前面,偶数移到后面,如图3-115(b)所示。文件中已经给出了所有控件和部分程序。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
提示:在“重排数据”按钮的事件过程中有对其算法的文字描述,请仔细阅读。
选项
答案
审题分析 本题源程序中,变量i和j均用作Text1文本框数组的索引号(即Index属性值),根据算法中的第1条,可知i=0、j=9、temp=Text1(i),其中“暂存最后一个数”的目的是为空出一个位置放第一个偶数。根据算法中的第3条,检查第j个数是否为奇数的条件表达式为:Text1(j) Mod 2=1。算法中的第2条和第3条交替运行,将实现一后(偶数)一前(奇数)重排数据的目的。根据算法中的第4条,可知在i向后移、j向前移过程中,当i=j时则停止这种移动(故While循环的条件表达式为i<i)。将先前暂存的数(temp)放到当前空缺位置,以实现算法中的第5条。 操作步骤 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: j=9 temp=Text1(j) while(i<j) If Text1 (j) Nod 2=1 Then 步骤2:按要求将文件保存至考生文件夹中。 考点链接 控件数组、Do循环和While循环。
解析
转载请注明原文地址:https://kaotiyun.com/show/kHUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据库(DB)、数据库系统(DBS)和数据库管理系统(DBMS)之间的关系是()。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimxAsIntegerStaticsAsIntegerx=Val(InputBox("请输入一个正整数="
以下关于控件数组的叙述中,错误的是
在名称为Form1,标题为“框架”的窗体上添加一个名称为:Frame1,且标题为空的框架。框架内含有两个单选按钮,名称分别为Opt1和Opt2,其标题分别为“字体”、“大小”。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件
在名称为Form1的窗体上添加一个名称为Command1的命令按钮,标题为“打开文件”,再添加一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码:①设置适当属性,使对话框的标题为“打开文件”;
在窗体上画一个Timer1计时器控件和一个Shape1形状控件,并编写如下程序PrivateSubForm_Load()Timer1.Interval=1000Timer1.Enabled=TmeEndSubPrivateSubTime
窗体上有一个名称为VScrolll的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
以下不可以作为“容器”的控件是
在标题为“列表框”、名称为Form1的窗体上添加一个名称为List1的列表框,通过属性窗口输入4个列表项:“数学”、“语文”、“历史”、“地理”,列表项形式采用复选框形式,如图所示。列表框的宽为1100,高不限。注意:存盘时必须存放在考生文件夹下,工程文
随机试题
营业杠杆
Ihadjustgonetobedafteraveryharddaywhenthephonerang.Itwasaneccentric(怪癖)farmer.Ihadnevermethimbeforealt
男性,25岁。3天前因受凉后突起高热、寒战,呈稽留热型,伴口角疱疹来诊。体检:右上肺叩诊呈实质性,闻及病理性支气管呼吸音。实验室检查:白细胞计数20.1×109/L。分类:中性粒细胞0.90,核型左移,并见中毒颗粒。关于本病例的病原学诊断最可能是
能全部通过六号筛,但混有能通过七号筛不超过95%.的粉末是能全部通过二号筛,但混有能通过四号筛不超过40%.的粉末是
开放式问题放在调查表的最前面。
国务院某部制定一行政规章,规定对某种行政违法行为,除处罚单位以外,还要给予直接责任人罚款的行政处罚,但规定这一违法行为处罚的国务院行政法规并没有规定要对直接责任人给予行政处罚。这一规章是否违法?()
甲在乘坐飞机的过程中将一装有锯末的黑色包装袋密封后放置在飞机坐席下的隐蔽处,下飞机后对其好友乙说,某航班有炸弹,今天可能有好戏看。乙熟悉甲的胆量和脾气,知道其不可能放置真正的炸弹,但为了制造真实景象,对甲的描述作加工处理后告诉其好友丙、丁,丙、丁二人深信不
DearHilda,I’vejustheardofmymotherhassuddenlybeen【76】______ill,andI’dliketogoandseewhatshe
IfyouareattendingbusinessmeetingsinAmerica,you’dbetter______.Whensomeonecan’tunderstandyouropinions,youshould
Theimpactofglobalwarmingcouldbetwiceassevereastheworstsituationfeared【C1】______theUnitedNations’scientists,t
最新回复
(
0
)