首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个文本框数组,名称为Text1,下标从0开始。程序运行后,单击“产生随机数”按钮,就会随机产生10个3位数,并放人Text1数组中(如图1所示);单击“重排数据”按钮,则把Text1中的奇数移到前面
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个文本框数组,名称为Text1,下标从0开始。程序运行后,单击“产生随机数”按钮,就会随机产生10个3位数,并放人Text1数组中(如图1所示);单击“重排数据”按钮,则把Text1中的奇数移到前面
admin
2019-03-14
39
问题
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个文本框数组,名称为Text1,下标从0开始。程序运行后,单击“产生随机数”按钮,就会随机产生10个3位数,并放人Text1数组中(如图1所示);单击“重排数据”按钮,则把Text1中的奇数移到前面,偶数移到后面(如图2所示)。已经给出了所有控件和部分程序。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
提示:在“重排数据”按钮的事件过程中有对其算法的文字描述,请仔细阅读。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Command1_Click() Randomize For k = 0 To 9 Text1(k) = CInt(Rnd() * 899 + 100) Next End Sub Private Sub Command2_Click() ’====================== ’======================= Dim i%, j%, temp%, flag As Boolean i = 0 ’ j = ? ’ ? = Text1(j) flag = True ’ While (i < ?) If flag Then If Text1(i) Mod 2 = 0 Then Text1(j) = Text1(i) j = j - 1 flag = Not flag Else i = i + 1 End If Else ’ If Text1(j) Mod 2 = ? Then Text1(i) = Text1(j) i = i + 1 flag = Not flag Else j = j - 1 End If End If Wend Text1(i) = temp End Sub 程序结束 参考答案 第1个?处填入:9 第2个?处填入:temp 第3个?处填入:j 第4个?处填入:1 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/U6Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于窗体的描述中,错误的是()。
编写如下事件过程:PrivateSubFormActivate()Dimscore(1To3)AsIntegerDimiAsInteger,tAsVariantFori=3To1Step-1score(
在名称为Forml的窗体上画一个名称为Labell、标题为“列表框的使用”的标签。再画一个名称为Listl的列表框,列表中含有5个表项,表项内容分别为“北京”、“山西”、“辽宁”、“浙江”和“广东”,并且可以在列表中同时选择多个表项。运行后的窗体如图4所示
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
设工程中有Form1、Form2两个窗体,要求单击Form2上的Commandl命令按钮,Form2就可以从屏幕上消失,下面的事件过程中不能实现此功能的是
窗体上有一个名称为CDl的通用对话框,一个名称为Textl的文本框,窗体的单击事件过程如下:PrivateSubForm—Click()CD1.DialogTitle=“改变颜色”:CD1.Color=Form1.BackColorCD1
两个或两个以上模块之间关联的紧密程度称为
在关系数据库中,用来表示实体间联系的是
确定图片框Picture1在窗体上位置的属性是
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为:Form1的窗体上画一个文本框,名称为txtlnput,无初始内容;再画一个图片框,名称为picOutput。请编写适当的事件过程,使得在运行时,在文本框中每输入一
随机试题
A、蛛网膜下腔出血B、抽搐C、两者均有D、两者均无颅内动脉瘤可见
A.常染色体显性遗传病B.常染色体隐性遗传病C.X-连锁显性遗传病D.X-连锁隐性遗传病E.Y-连锁遗传病交叉遗传现象,即男性患者的女儿都是患者,儿子都正常的是
下图所示为热水供暖系统示意图,用户1、2的循环水量各为10t/h,用户处作用压力△PBC=15000Pa,热力站处作用压力△PAO=45000Pa,现在BC处接入一个与1、2完全相同的用户3,接入新用户前后AO压差保持不变,则接入用户3以后每个用
费用计划编制的主要依据有()。
从业人员在施工过程中发现有直接危及人身安全的紧急情况时,享有停止作业或者在采取可能的应急措施后撤离作业场所的权利,这种权利也被称之为( )。
下列属于会计行政法规的是()。
证券公司设立分公司、证券营业部等分支机构的,应当对分公司、证券营业部,分别按每家2000万元、5000万元计算风险资本准备。()
请认真阅读下列材料,并按要求作答。动作方法:采用站立式起跑,用较快速度跑20~30米后,以匀速进入途中跑。途中跑的动作方法与快速跑基本相同,但是动作的幅度较小,要求动作轻快、协调,步幅均匀,并有节奏地呼吸,合理控制跑速和分配体力,快到终点时努力用较快的
国家加大从村两委干部中考录乡镇公务员。请你谈谈对这一政策的看法。
InwintertheremaybeseveralfeetofsnowinotherpartsofEnglandbuttherewillprobablybenomowatallinthesouthwest.
最新回复
(
0
)