首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件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
20
问题
在考生文件夹下有一个工程文件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://jikaoti.com/ti/dSN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段中没有错误的是()。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimxAsIntegerStaticsAsIntegerx=Val(InputBox("请输入一个正整数="
阅读程序:PrivateSubForm_Click()DimxAsInteger,yAsIntegerx=32:y=42CallPCS(x,y)Printx;yEndSubSubPCS(ByValnAsIntege
下面关于VB应用程序的叙述中正确的是
对于某些控件,只要将其Style属性设置为1,则可以在该控件上使用Picture属性显示图片。以下不具备这一使用规则的控件是
以下不能设置Picture属性的控件是
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性。该属性为
编写如下程序:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=1:y=1Doy=x*yIfy>10ThenPrintx,yExitDoElsex=x+3En
设有如下事件过程:PrivateSubCommand1_Click()Fori=1To5j=iDoPrint"*"j=j-1LoopUntilj=0NextiEndSub运行程序,输出“*”的个数是
随机试题
行政机关应当在听证的()日前,通知当事人举行听证的时间、地点。
从总体上起着导向、调节、凝聚、教化及动力功用的是()
对慢性阻塞性肺疾病最有诊断价值的肺功能检查是
功能空间使用辅助部分与交通联系组合方式不包括()。
兴盛商业大厦位于某市船营区珲春街与河南街交汇处,经消防审核合格后开工建设。建成后经消防验收合格后投入使用,并先后经过两次扩建,造成整体建筑大部分用实体墙和铝塑板封堵。大厦共有业户64家,其中个体工商户57家,具有法人资质的企业7家,日常管理由商业大厦负责。
下列固定资产的相关损失项目中,不应计入营业外支出的有()。
音乐教师的审美修养决定着音乐教育的()。
根据以下资料。回答问题。日前,A市市场监管局发布内资企业半年度分析报告。2015年上半年,该市新设内资企业20518户,注册资本(金)1651.8亿元,同比分别增长39.7%和133%。其中私营企业20187户,注册资本(金)1258.
BillGates,thebillionaireMicrosoftchairmanwithoutasingleearneduniversitydegree,isbyhissuccessraisingnewdoubtsa
Today,moreandmorepeopleintheUnitedStatesareusingcreditcardsinsteadofmoneytobuythethingstheyneed.Almostany
最新回复
(
0
)