首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序代码实现生成20个0~100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段是( ),完成程序。 Private Sub Command1_Clickn Dim arr(1 To 20)
下列程序代码实现生成20个0~100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段是( ),完成程序。 Private Sub Command1_Clickn Dim arr(1 To 20)
admin
2010-09-11
62
问题
下列程序代码实现生成20个0~100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段是( ),完成程序。 Private Sub Command1_Clickn Dim arr(1 To 20) For i=1 To 20 arr(i)=______ Text1.Text=Text1.Text&arr(i)&Chr(13)&Chr(10) Next i Sum=0 For Each X______ If X>50 Then Print Tab(20);X Sum=Sum+X End If Next X Print Tab(20);"Sum";Sum End Sub
选项
A、Int(Rnd*99+1) In arr
B、Int (Rnd)In arr
C、Int(Rnd*99+1) In arr()
D、Int(Rnd)In arr()
答案
A
解析
Pad函数用于产生一个小于1但大于或等于0的实数,题中要求0~100之间的随机整数,所以需要对Pad产生的实数进行计算处理Int(Pad*99+1)。要处理数组中的元素,使用For Each…Next语句处理数组元素时,Each后只需写出数组名,不能使用小括号。
转载请注明原文地址:https://www.kaotiyun.com/show/ZCmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在J2SE1.4中,文件通道类FileChannel所属的包是( )。
字符串分为两大类,一类是字符串常量,使用String类的对象表示;另一类是字符串变量,使用【】类的对象表示。
char类型的取值范围是
软件是程序、数据和相关______的集合。
假设有以下代码:Strings="hello";Stringt="hello";charc[]={’h’,’e’,’l’,’l’,’o’};下列选项中,返回false的语句是______。
下面是一个类的定义,试将程序补充完整。classA{Strings;____inta=66;A(Stringsl){s=sl;}staticintgeta(){returna;}}
在面向对象的程序设计中,用来请求对象执行某一处理或回答某些信息的要求称为______。
下列程序段执行后,变量c的值为( )。publicclassTest{publicstaticvoidmain(String[]args){floata=10,b=9,c=8;
下列属于正则表达式的是
下列不属于虚拟机执行过程的特点的是()。
随机试题
2013年1-6月,全国累计生产粗钢3.9亿吨,同比增长7.4%,增速较去年同期提高5.6个百分点。前6个月,粗钢日均产量215.4万吨,相当于年产粗钢7.86亿吨水平。其中,2月达到历史最高的220.8万吨,3-6月虽有回落,但仍保持在210万吨以上较高
慢性淋巴细胞白血病可并发
运输包装上的标志就是运输标志,即唛头。()
经纪类证券公司最低注册资本限额为()元人民币。
利润表是反映企业在()的报表。
一般资料:求助者,女性,45岁,个体老板。案例介绍:求助者的儿子患有先天性心脏病,十多年来她把大部分的时间和金钱都用在了为儿子看病上。她认为儿子患病是由于自己年轻无知,怀孕期间吃药造成的,为此一直自责,异常痛苦。有一次儿子生病,半夜到急诊室就诊,
危机公关是指由于企业管理不善、同行业竞争甚至遭遇恶意破坏或者是外界特殊事件的影响,而给企业或者品牌带来危机,企业针对危机所采取的一系列自救行为,包括消除影响、恢复形象等。根据上述定义,下列属于危机公关的是()。
得陇望蜀:狼子野心
FredCookeofSalfordturned90twodaysagoandtheworldhasbeenbeatingapathtohisdoor.Ifyouhaven’tnoticed,theback
Impressionismisaformofartthatbeganinthe1870’s.Whenyoulookcloselyatanimpressionistpainting,youseelittledots
最新回复
(
0
)