首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个名称为Text1的文本框数组,下标从0开始。程序运行时,单击“产生随机数”按钮,就会产生10个3位数的随机数,并放入Text1数组中,如图3—183(a)所示;单击“重排数据”按钮,将把Text1
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个名称为Text1的文本框数组,下标从0开始。程序运行时,单击“产生随机数”按钮,就会产生10个3位数的随机数,并放入Text1数组中,如图3—183(a)所示;单击“重排数据”按钮,将把Text1
admin
2017-10-27
49
问题
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个名称为Text1的文本框数组,下标从0开始。程序运行时,单击“产生随机数”按钮,就会产生10个3位数的随机数,并放入Text1数组中,如图3—183(a)所示;单击“重排数据”按钮,将把Text1中的奇数移到前面,偶数移到后面,如图3—183(b)所示。文件中已经给出了所有控件和部分程序。
要求:请去掉程序中的注释符,把程序中的“?”改为正确的内容,使其能正确运行,不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
提示:在“重排数据”按钮的事件过程中有对其算法的文字描述,请仔细阅读。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: j=9 temp=Text1(j) While(i<j) If Text1(j)Mod 2=1 Then 步骤2:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/UVGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在事件过程中,Private表示______。
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click()s=0Fori=1To15x=2*i-1
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimnumAsIntegernum=1DoUntiLnum>6
设x=4,y=8,z=7,下列表达式的值是()。x>zOrz<x
以下程序的功能是:从键盘上输入若干个数字,当输入负数时结束输入,统计出若干数字的平均值,输出结果。请填空。PrivateSubForm_click()Dimx,yAsSingleDimzAsIntegerx=InputBox("E
执行语句DimX,YAsInteger后,______。
下面子过程语句说明合法的是
下面程序是由鼠标事件在窗体上画图,如果按下鼠标可以画图,双击窗体则可以清除所画图形。补充完整下面的程序。首先在窗体层定义如下变量:DimPaintStartAsBoolean编写如下事件过程:PrivateSubForm_Load()Dr
下列表达式中,()的运算结果与其他3个不同。
某二叉树的先根遍历序列为CEDBA,中根遍历序列为DEBAC,则其后根遍历序列为【】。
随机试题
患者,男,30岁,半小时前因汽车撞伤头部入院,入院时已昏迷。对于此患者应采取的护患关系模式是
属于氨基酸类的激素是A.GHB.胃肠激素C.前列腺素D.甲状腺激素E.性激素
下列关于平均动脉压(MAP)的叙述哪项是正确的()。
小儿急性支气管肺炎最常见的细菌和病毒病原是
手太阳小肠经与足太阳膀胱经的交接部位是()
抑制病毒逆转录酶,用于艾滋病治疗的药物是抑制二氢叶酸还原酶,用于疟疾预防和治疗的药物是
根据《招标投标法实施条例》,投标人撤回已提交的投标文件,应当在投标截止时间前书面通知招标人,招标人已收取投标保证金的,应当自收到投标人书面撤回通知之日起()日内退还。
根据以下资料,回答86-90题2009年前三个季度,我国规模以上电子信息制造业扭转了上半年下滑的势头,但比去年同期增速下降10个百分点以上。重点产品增长面逐步扩大。9月,重点监测的27个产品中,14个产品产量出现正增长,比上半年多了3个产品;其中计算机、
StellaWemightmarvelattheprogressmadeineveryfieldofstudy,butthemethodsoftestingaperson’sknowledgeandabi
•Readthefollowingarticleandthequestionsafterthearticle.•ForeachQuestion15-20,markoneletter(A,B,CorD)ony
最新回复
(
0
)