首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下程序段运行的结果是:_______。 Dim a(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer
以下程序段运行的结果是:_______。 Dim a(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer
admin
2013-01-23
46
问题
以下程序段运行的结果是:_______。 Dim a(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=True For i=-1 To 5 j=j+1 Ifa(i)=False Then a(i)=True Exit For End If If i=5 Then flag=True End If Next Loop Print j
选项
A、20
B、7
C、35
D、8
答案
4
解析
该程序段的作用是给数组a的每个数组元素赋值True,具体实现的方式为:每次从数组a的第一个元素开始判断,该元素是否为False,如果是,则令此元素为True,然后跳出循环,重新从数组a的第一个元素开始判断;如果当前元素不为False,则判断下一个元素。因此语句j=j+1将执行 1+2+3+4+5+6+7=28次,即j=28。然后再遍历一遍数组a的所有元素,最后结束程序段。所以j最终的值是: j=28+7=35。
转载请注明原文地址:https://www.kaotiyun.com/show/88hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体Form1中有一个名称为Image1的图像框,在窗体加载的时候为它装载了一幅图片,该图片比图像框要小如图20-2a所示,现在单击一下图像框,将把照片放到和图像框一样大,如图20-2b所示。再单击它将其还原,然后再单击放大,再单击还原,如此反复。下划线
在用最坏情况复杂度分析算法的时间复杂度时,是分析算法执行基本运算的最大次数。它的计算难易性及实用性与平均性态相比,最坏情况复杂度()。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()n=1f=1s=0Fori=1Tonf=
已知在窗体上有一个文本框控件,它的名称为Text1,且输入的字符全部为数字,现在要把该字符转换为整数送给整型变量C,所用到的语句是【】。
数据库三级模式体系结构的划分,有利于保持数据库的【】。
有下列程序:OptionBase0PrivateSubCommand1_Click()DimCityAsVariantx=Array("Visual","Basic","Microsoft","
在程序代码中将图片文件mypic.jpg装入图片框Picture1的语句是
VisualBasic中工程文件的扩展名是()。
对序列(7,19,24,13,31,8,82,18,44,63,5,29)进行一趟排序后得到的结果如下:(7,18,24,13,5,8,82,19,44,63,31,29),则可以认为使用的排序方法是
在E-R图中,用来表示实体的图形是______。
随机试题
下列属于多巴胺受体阻断药的有
一切从实际出发、理论联系实际、实事求是、在实践中检验和发展真理属于_______。
“文化大革命”中全面内乱形成于()
上运动神经元性瘫痪又称弛缓性瘫痪、软瘫及周围性瘫痪,不伴肌张力增高。
A、川芎B、王不留行C、五灵脂D、土鳖虫E、白茅根既活血通经,又下乳消肿的药是()
王东彪诉刘满仓房屋租赁纠纷一案由丹江县人民法院受理。第一次开庭时,因原告未带有关证据的原件,法庭决定休庭;第二次开庭时,原告在法庭辩论时提出,本案合议庭中的书记员刘河江为被告刘满仓的弟弟,故要求刘河江回避,审判长以法庭调查已结束为由,驳回了原告的回避申请。
会计信息要有助于决策者决策,是()原则的要求。
【2012年福建】根据《中华人民共和国教育法》,下列不属于设立学校及其他教育机构必须具备的基本条件是()。
AmazontodayunveiledDashButtons,aneasywayforcustomersto【C1】______selectbulkgoods【C2】______aninternet-connectedbut
HowmanyprovincesandterritoriesdoesCanadahave?
最新回复
(
0
)