首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个文本框数组,名称为Text1,下标从0开始。程序运行后,单击“产生随机数”按钮,就会随机产生10个3位数,并放入Text1数组中(如图1所示);单击“重排数据”按钮,则把Text1中的奇数移到前面
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个文本框数组,名称为Text1,下标从0开始。程序运行后,单击“产生随机数”按钮,就会随机产生10个3位数,并放入Text1数组中(如图1所示);单击“重排数据”按钮,则把Text1中的奇数移到前面
admin
2015-10-23
22
问题
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个文本框数组,名称为Text1,下标从0开始。程序运行后,单击“产生随机数”按钮,就会随机产生10个3位数,并放入Text1数组中(如图1所示);单击“重排数据”按钮,则把Text1中的奇数移到前面,偶数移到后而(如图2所示)。已经给出了所有控件和部分程序。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
提示:在“重排数据”按钮的事件过程中有对其算法的文字描述,请仔细阅读。
选项
答案
步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“t”,将问号改为正确的内容。 Private Sub Commandl_click() Randomi ze For k=0 To 9’随机产生10个3位数,并分别显示在文本框中 Textl(k)=CInt(Rnd()*899+100) Next’CInt(N)函敷用于取小于或等于N的最大整数,Rnd()函数用于随机生成[0.1)之间的数 End Sub Private Sub Command2_Click() Dim i%,j%,temp%,flag As Boolean i=0 j=9将9赋予j temp=Textl(j)’将最后一个控件赋给temp flag=True While(i
解析
令i指向第一个数,j指向最后一个数,并先暂存最后一个数;检查第i个数是否为偶数,如果不是,再检查下一个,直到第i个是偶数,则把此偶数放到第j个位置,j向前移1个位置;检查第i个数是否为奇数,若不是,再检查前一个,直到第i个是奇数,则把此奇数放到第i个位置,i向后移1个位置;重复判断,直到i=j把开始暂存的数放到i的位置,使奇数移到前面,偶数移到后面。
转载请注明原文地址:https://jikaoti.com/ti/dKJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下:SubCommand1_Click()DimstudentAsstudtypeDimrecord_noAsIntegerrecord_no=1
在VisualBasic的立即窗口内输入以下语句X=65PrintChr$(X)在窗口中显示的结果是
以下各项中,VisualBasic不能接收的图形文件是
定时器的Interval属性以()为单位指定Timer事件之前的时间间隔
当文本框ScrollBars属性设置了非零值,却没有效果,原因是
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为M1。设窗体Form1标题为"myform1",双击控件数组中的第3个按钮,打开代码编辑器,写下如下代码:PrivaeSubM1_Click(IndexAsInteger)Form1.
设A$="北京",B$="Shanghai",则表达式LEFTS(A$,2)+STRINGS(3,"-")+LEFTS(BS,8)构成的字符串是
软件复杂性度量的参数包括______。
数据库管理系统常见的数据模型有层次模型、网状模型和【】3种。
随机试题
_____didIfeeltheywerebeingunreasonable.
基于双膜部件系统设计的相机是
症见发热,自汗出,渴喜温饮,少气懒言,体倦肢软,面色晄白,大便稀溏,脉洪而虚,舌质淡,苔薄白。治宜选用( )。
下列选项中,属于临床诊疗道德原则的是()。
某居民准备购买一套小区住宅,已经有15万元的积蓄,他看中一套总价35万元的住宅,但该住宅要在一年后才可以签署购房合同,因此,他准备把15万元先存银行,当年的年利率是2.4%,若有两种方式可以选择:一种是以一年计息一次;一种是每季度进行一次计息。他想选择一种
工程项目安全检查的类型不包括( )。
企业在对会计要素进行计量时一般应当采用()。
Here’sawarningfromhealthexperts:Sittingisdeadly.Scientistsareincreasinglywarningthatsittingforprolongedperiods—
计算
Theannouncement_______greatlydistressedthewaitingpassengers.
最新回复
(
0
)