首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim I,Num Randomize Do For I=1 To 100
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim I,Num Randomize Do For I=1 To 100
admin
2020-04-18
27
问题
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim I,Num
Randomize
Do
For I=1 To 1000
Num=Int(Rnd*100)
Print Num;
Select Case Nam
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/TlTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上有一个名称为Drivel的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分别为Label1、Label2的标签(标题分别为空白和“共有文件”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化
实现字符的UniCode编码方式与ANSI编码方式相互转换的函数是()。
开发软件所需高成本和产品的低质量之间有着尖锐的矛盾,这种现象称做()。
下列关于利用通用对话框产生的文件对话框的相关属性的描述中,错误的是
在窗体画一名为CommonDialogl,则下列与CommonDialogl.ShowOpen方法等效的语句是
设有下面的程序段:x=InputBox(”请输入一个整数”)ReDima(x)Fork=xTo0Step一1a(k)=kNextk一般,在这段程序之前应先进行数组a的定义。下面
以下合法的VB变量名是
设有如图所示窗体和以下程序:PirintSubCommandl_Click()Text1.Text=”VisualBasic”EndSubPrivateSubText_LostFocusOIfText1.
在窗体上画一个名称为Filel的文件列表框,并编写如下程序:PrivateSubFile1_DblClickOx=Shell(File1.FileName,1)EndSub以下关于该程序的叙述中,错误的
随机试题
简述课外校外教育的主要内容。
性传播性疾病的英文缩写为下列哪项
一名车祸病人,有股骨干开放性骨折,可能有脾破裂引起的内出血,存在张力性气胸、面部和头皮的撕裂伤,首先处理措施是
心肺复苏时最常用的首选药是
背景资料:某公路施工公司低价中标一合同价为16000万的隧道工程,为了能够降低工程成本,项目经理决定采取以下措施:(1)认真组织施工,合理安排,力求避免机械的闲置;(2)对工程材料实行严格的限额领料制度;(3)暂时降低安全生产费用,用于购买急缺的
妄想是一种病理性的歪曲信念,是病态的推理和判断,它具有以下特征:①信念的内容与事实不符,没有客观现实基础,但患者坚信不疑;②妄想内容均涉及患者本人,总是与个人利害有关;③妄想具有个人独特性;④妄想的内容因文化背景和个人经历而有差异,但常有浓厚的时代色彩。下
A.EverythingisautomaticB.WecanacceptthetaxpaymentsC.thebalanceswillbeusedeveryquarterfortaxliabilitypayments
有如下程序:#includeusingnamespacestd;classMyClass{public:MyClass(inti=0){cout
It’s1997,andit’srainingandyou’llhavetowalktoworkagain.Anygivensubwaytrainbreaksdownonemorningoutoffive.T
A、Motivation.B、Getjobdone.C、Increaseproduction.D、Trainemployees.A
最新回复
(
0
)