首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序的执行结果是( )。 Private Sub Form_Activate() Dim score(3)As Integer,total As Integer Dim aa score As Variant score(1)=50:score(
下列程序的执行结果是( )。 Private Sub Form_Activate() Dim score(3)As Integer,total As Integer Dim aa score As Variant score(1)=50:score(
admin
2020-06-30
66
问题
下列程序的执行结果是( )。
Private Sub Form_Activate()
Dim score(3)As Integer,total As Integer
Dim aa score As Variant
score(1)=50:score(2)=14:score(3)=36
total=0:i=0
For Each aa score In score
i=i+1
total=total+aascore
Print i,aa score,tota1
Next
End Sub
选项
A、1 0 0
2 50 50
3 14 64
4 36 100
B、1 50 50
2 14 64
3 36 100
C、0 50 50
1 14 64
2 36 100
3 36 100
D、0 0 0
1 50 50
2 14 64
3 36 100
答案
A
解析
本题考查For Each In语句。该语句的使用形式为:For Each成员In数组…Next,适用于不关心数组中的元素个数或者不清楚有多少个元素,使用时要求成员为变体类型变量。当激活窗体时,对score数组中的每个元素进行求和,同时i记下当前计算数组元素的个数。默认数组下标从0开始,题中score数组中含有4个元素,输出4行。
转载请注明原文地址:https://kaotiyun.com/show/9HHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有数据定义语句:DimX,YAsInteger以上语句表明
如果要将一个窗体从内存中清除,应使用的语句是()。
语句PrintFormat$(23846.5,"000,000.00")的输出结果是
假定窗体上有一个标签,名为Label1,为了使该标签透明并且没有边框,则正确的属性设置为()。
要使一个文本框可以显示多行文本,应设置为True的属性是
编写如下程序:PrivateSubCommand1Click()DimmAsInteger,nAsIntegerm=2:n=1SelectCasemCase1SelectCasenCase1Print“AAA”Ca
下列针对框架控件的叙述中,错误的是()。
随机试题
请编写一个函数longFibo(intn),该函数返回n的Fibonacci数。规则如下:n等于1或者2时,Fibonacci数为1,之后每个Fibonacci数均为止前两个数之和,即:F(n)=F(n-1)+F(n-2)注意:清使用递归
如今,我们已经不能完全回归到百年前自给自足的生活方式,消费几乎是一种必需。但消费与自然主义其实并不矛盾,关键是人们只购买必需的东西,停止不必要的消费。圣严法师曾劝谏世人:需要的不多,想要的太多。如果大家都能厘清想要和需要之间的区别,把物质需求降至最低,对于
与铸铁焊条型号EZNi一1相对应的牌号是Z308。
下列情况中,期货公司应当在5个工作日内向住所地的中国证监会派出机构书面报告的有( )。
红利是股东在公司按规定股息率分派后取得的剩余利润。()
已知数列{an}的通项公式an=2n+ln(n+1),数列{bn}的通项公式bn=an-1-an,则数列{bn}的前n项和Sn=____________.
一、注意事项1、申论考试与传统的作文考试不同,是分析驾驭材料的能力与表达能力并重的考试。2、作答参考时限:阅读时间40分钟,作答110分钟。3、仔细阅读给定的资料,按照后面提出的“作答要求”依次作答在答题纸指定位置。4、答题时认准题号,避免答错位置
1961年9月,不结盟国家和政府首脑会议宣言中写道:“和平共处的原则是代替‘冷战’和可能发生的全面核灾祸的唯一办法。因此,这些原则——包括人民享有自决、独立和自由决定经济、社会和文化发展的方式和方法的权利——必须成为一切国际关系的唯一基础。”下列有关表述不
Theevolutionofsexratioshasproduced,inmostplantsandanimalswithseparatesexes,approximatelyequalnumbersofmalesa
Timeisrunningoutforgovernmentstooverhaulregulationofglobalbanksthathavebecomebiggerandmorepowerfulsincethes
最新回复
(
0
)