首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下事件过程: 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
2016-08-24
886
问题
在窗体上画一个命令按钮,然后编写如下事件过程:
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://jikaoti.com/ti/NpJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序的执行结果为()。PrivateSubCommand1_Click() Dims1AsString,s2AsString s1="abcdef" CallInvert(s1,s2)
设窗体上有一个名为Text1的文本框,并编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text1.SetFocusEndSubPrivateSubForm
检查软件产品是否符合需求定义的过程称为
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程:PrivateSubCommand1_Click() CommonDialog1.Flags=vbOFNHideReadOnly
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load0ShowText1.Text=""Text2.Text=""Te
在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程:PrivateSubTxtA_KeyPress(keyAsciiAsInteger)EndSub若焦点位于文本框中,则能够触发KeyPress事件的操作是(
以下关于变量作用域的叙述中,正确的是()。
下列叙述不正确的是()。
下列符号()是VisualBasic中的合法变量名。
与Form1.Show方法效果相同的是()。
随机试题
A、Ithasafixedrhythm.B、Itissimilartothetraditionaljazz.C、Itisfreeandspontaneous.D、Itisatypicallyelectronicm
张若虚《春江花月夜》:不知乘月几人归,__________。
下列情况适宜第一产程期间肥皂水灌肠的是()
根据《兽药经营质量管理规范》,应当申请换发兽药经营许可证的是()
油性皮肤的人经常用化妆品时,施用部位最容易发生
以下有关“应交税费——增值税检查调整”专门账户的表述,正确的有()。
关于纳税人、扣缴义务人的法律责任,下列说法正确的有()。
下列各句中,加下划线的成语运用不当的是:
五四运动表现出来的爱国主义精神,与以往的爱国主义相比较,具有历史进步性和鲜明时代性。这种爱国主义不是盲目排外,而是为了维护国家独立和民族尊严;不是_________________,而是与民主和科学精神紧密联系,追求发展进步;不是_____________
SevenWaystoCreateaHappyHouseholdA)Everyfamilyisdifferent,withdifferentpersonalities,customs,andwaysofthin
最新回复
(
0
)