首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim I, Num Randomize Do For I=1 To 1000 Num=Int(Rnd *
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim I, Num Randomize Do For I=1 To 1000 Num=Int(Rnd *
admin
2018-09-19
117
问题
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim I, Num
Randomize
Do
For I=1 To 1000
Num=Int(Rnd * 100)
Print Num;
Select Case Num
Case 12
Exit For
Case 58
Exit Do
Case 65, 68, 92
End
End Select
Next I
Loop
End Sub
上述事件过程执行后,下列描述中正确的是( )。
选项
A、Do循环执行的次数为1000次
B、在For循环中产生的随机数小于或等于100
C、当所产生的随机数为12时结束所有循环
D、当所产生的随机数为65、68或92时窗体关闭、程序结束
答案
D
解析
程序Do循环中嵌套了For循环,Do循环没有设置结束条件,而是在For循环体中的Select语句中设置了退出Do循环和For循环及结束程序的分支,因此Do循环的次数无法确定。随机函数Rnd产生[0,1)之间的一个数,包括0但不包含1,因此Rnd*100的范围是大于等于0小于100。随机数为65、68或92时结束程序关闭窗体,为58时退出Do循环,为12时退出For循环进入下一次Do循环。
转载请注明原文地址:https://kaotiyun.com/show/36Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在名称为Forml的窗体上用名称为shape1的形状控件画一个长、宽均为1200的正方形。请设置适当的属性以满足下列要求:①窗体的标题为“正方形”,窗体的最小化按钮不可用。②正方形的边框为虚线(线型不限)。程序运行后的窗体如图所示
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是( )。
窗体上有一个名为List1的列表框和一个名为Command1的命令按钮,并有下面的事件过程:PrivateSubCommand1_Click() n%=List1.ListIndex Ifn>0Then ch$=List1.Lis
对于窗体而言,在运行期间对其值改变无效的属性是
在数据库设计中,将E-R图转换成关系数据模型的过程属于
编写如下程序:PrivateSubForm_Click()DimiAsInteger,jAsIntegerDimnumAsIntegerDimarr(3,3)AsIntegernum=1
在窗体上画1个名称为Command1的命令按钮,1个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click()DimiAsInteger,jAsIntegerDimsAsIn
编写如下程序:DimxAsInteger,yAsInteger,zAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2:y=3:z=10
以下关于通用对话框的叙述中,错误的是
数据库中对概念模式内容进行说明的语言是
随机试题
下列各项主要用于证实客观事物的审计方法有()
Somepeopleworryaboutmycollectingofthosefascinatingbirdsandanimalsthattheypaytoseeinthezoo.Oneofthequestio
A.乌头B.甘草C.三棱D.芒硝E.藜芦不宜与瓜蒌同用的药是()
我一生走南闯北,甚至出访欧美,然而想不到对自己少年时__________的松花江.却__________,填入划横线部分最恰当的一项是:
当下的文化娱乐样式不可谓不多,流行风一阵接一阵,但是文化娱乐的品质却在不断下降,娱乐中的真诚、温暖和亲密正在_________、稀释和丑化。让我们感到十分无奈的是,这种泛滥的所谓热点,_________,不可一世,仿佛要_________人们的生活。填入划
Thelawofsupplyanddemandwilleventuallytakecareofashortageor______ofdentists.
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:PrivateSubCommand1_Click()Dimao/0,b%,i%s=1:a=2Fori=2
打开考生文件夹下的演示文稿yswg.ppt,按照下列要求完成对此文稿的修饰并保存。(1)在第三张幻灯片的剪贴画区域中插入Office收藏集中“学院”类的剪贴画。然后将该幻灯片版式改为“标题,剪贴画与竖排文字”。文本部分字体设置为“宋体”
Assumingthataconstanttravel-timebudget,geographicconstraintsandshort-terminfrastructureconstraintspersistasfundame
A.--theBeginningofSpringB.--theWakingofInsectsC.--PureBrightnessD.--GrainRainE.--theSummerSolsticeF.--
最新回复
(
0
)