首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,然后编写其Click事件过程代码如下: Private Sub Command1_Click() Dim i As Integer, num As Integer Do For i = 1
在窗体上画一个名称为Command1的命令按钮,然后编写其Click事件过程代码如下: Private Sub Command1_Click() Dim i As Integer, num As Integer Do For i = 1
admin
2015-06-30
20
问题
在窗体上画一个名称为Command1的命令按钮,然后编写其Click事件过程代码如下:
Private Sub Command1_Click()
Dim i As Integer, num As Integer
Do
For i = 1 To 10
num = Int(Rnd * 10) + 1
Select Case num
Case 2
Exit For
Case 7
Exit Do
End Select
n = n + 1
Next i
Loop
Print n
End Sub
则下面描述中正确的是
选项
A、当变量num的值为2时,事件过程Command1_Click执行结束
B、当变量num的值为7时,Do循环将终止
C、变量num的值一定是大于或等于11的整数
D、Do循环的执行次数一定为10次
答案
B
解析
选项A,当变量num值为2时,满足Case 2,退出For循环。注意,其仅退出内层For循环,没有退出外层Do 循环,故选项A错误;Rnd英文全称Random,意为随机数,Rnd*10生成一个取值在[1,10)之间的随机数(注意不包含10)。取整函数Int(x),返回值为不大于自变量x的最大整数,num = Int(Rnd*10)+1,生成一个在1到10之间的随机整数,故选项C错误;但Select ……Case中,满足Case 7时,直接退出Do……While循环,循环结束,故Do循环的执行次数不一定为10次,D选项错误;本题正确答案为B。
转载请注明原文地址:https://jikaoti.com/ti/f260FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组,然后画一个名为Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输入7个分数,单击“计算得分”命令按钮,则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分
将C盘根目录下的图形文件moon.jpg装入图片框Picture1的语句是______。
在窗体上面两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后,如果单击“初始化”命令按钮,则对数组a的各元素赋值;如果单击“求和”命令按钮,则求出数组a的各元素之和,并在文本框中显示出来,如图所示。请填空
在窗体上画三个单选按钮,组成一个名为chkOption的控件数组。用于标识各个控件数组元素的参数是
一个变量未被显式定义,末尾没有类型说明符,则该变量的隐含类型是______类型。
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请将下面的程序补充
以下叙述中正确的是
以下关于变量作用域的叙述中,正确的是
随机试题
简述现行检察法律文书的格式情况。
在遇难者和垂死者当中度过的一夜菲尔•戴维森【路透社发自哥伦比亚阿梅罗镇】至少有15000人死亡,还有数百人在死亡线上挣扎。我极力想在哥伦比亚火山爆发灾难中的幸存
“向心性肥胖”时特殊体形呈现为圆脸,厚背、躯干发胖而四肢消瘦,常常提示
下列哪项是管理信息系统的核心
A.痰结核菌阳性B.空洞病灶C.干酪性病灶D.痰结核菌阴性E.结核菌素试验(+++)
公司的合并
在应用高低点法进行成本性态分析时,选择高点坐标的依据是一定时期内最高的成本总额。()
简述《中华人民共和国教师法》中规定的教师应承担的义务。
2017年我国成年国民图书阅读率为59.1%,比上年增加0.3个百分点;报纸阅读率为37.6%,比上年降低2.1个百分点;期刊阅读率为25.3%,比上年增加1个百分点。2017年我国成年国民数字化阅读方式(网络在线阅读、手机
有如下程序:#inc1ude<iostream>usingnamespacestd;c1assSamp1e{friendlongfun(Samp1es);public:S
最新回复
(
0
)