首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command l_Click() Dim I,Num Randomize Do
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command l_Click() Dim I,Num Randomize Do
admin
2020-01-02
38
问题
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command l_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
解析
本题考查的考点是有关随机数和退出语句的。在本题中,首先在循环中生成一个随机数,由于Rnd函数可以生成0~1开区间的数,所以Int(Rnd*100)能够生成0~99之间的整数,随后对此数进行判断,当随机数为12时退出内循环;当随机数为58时退出外循环;当随机数为65、68或92时将会结束整个窗体的运行。本题中的循环次数受随机数控制,所以次数不定。
转载请注明原文地址:https://www.kaotiyun.com/show/ybTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如图所示,在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timer1。要求每1s在文本框中显示一次当前的时间。PrivateSubTimer1TextTime.Text=TimeEndSub在下划线上应填入
已知变量x、y为整数型,且x=4,y=12,s为字符串型,且s=a,LblOk为标签控件,下列赋值语句不合法的是()。
假设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是()。
下列不一定是传值的虚实结合方式的选项是()。
下列叙述中有错误的是()。
以下描述中,不是线性表顺序存储结构特征的是()。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个文本框,名称为Text1,内容为“VB程序设计”;再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“扩
以下VisualBasic不支持的循环结构是
窗体上有名称为Command1的命令按钮和名称为Text1的文本框()。PrivateSubCommand1_Click()Text1.Text="程序设计":Text1.SetFocusEndSubP
随机试题
请简述会计制度设计协同度高这一特点的具体含义。
男性,39岁,开始感觉疲倦、烦躁、头痛、食欲缺乏,以后逐渐出现腱反射异常,上行性多发性神经炎,并出现肌肉乏力和疼痛,腓肠肌压痛、痉挛,腿沉重麻木并有蚁行感。检测该营养素在体内的含量,需进行的相关检查是()。
颗粒剂的水分不得超过水蜜丸的水分不得超过
A.脊髓型颈椎病B.椎动脉型颈椎病C.颈型颈椎病D.颈椎管狭窄E.神经根型颈椎病颈部疼痛,四肢无力,上行性运动神经元不全瘫痪,下肢肌腱反射无亢进,Hoffmann征(+),则为()
章俊诉李泳借款纠纷案在某县法院适用简易程序审理。县法院判决后,章俊上诉,二审法院以事实不清为由发回重审。县法院征得当事人同意后,适用简易程序重审此案。在答辩期间,李泳提出管辖权异议,县法院不予审查。案件开庭前,章俊增加了诉讼请求,李泳提出反诉,县法院受理了
某新建酒店原定于2004年12月18日开业,可由于工期延误,不得不将开业日期推迟到2005年2月18日,那么在开业前应由()来办理工程竣工验收备案。
在一个链队列中,假定。front和rear分别为队首和队尾指针,则删除一个节点的操作为()。
【F1】Aleakedstudyexamininggenetically-modifiedcornrevealsthatthelab-madealternativetoorganiccropscontainsastartli
Weshouldmakeaclear______between"competent"and"proficient"forthepurposesofourdiscussion.
VisitingaNationalParkcanberelaxing,inspiringandrejuvenating,butitcanalsobedisturbing.AsyoudriveintoRockyMou
最新回复
(
0
)