首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序的执行结果是( )。 PriVate Sub Form_Activate() Dim score(3)As Integer,total As Integer Dim aa_score As V撕ant score(1)=50:score(2
下列程序的执行结果是( )。 PriVate Sub Form_Activate() Dim score(3)As Integer,total As Integer Dim aa_score As V撕ant score(1)=50:score(2
admin
2019-03-14
30
问题
下列程序的执行结果是( )。
PriVate Sub Form_Activate()
Dim score(3)As Integer,total As Integer
Dim aa_score As V撕ant
score(1)=50:score(2)=14:score(3)=36
total=0:i=0
For Each aa_score In score
i=i+1
tota1=tota1+aa_score
Print i,aa_score,tota 1
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
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
答案
A
解析
本题考查For Each In语句。该语句的使用形式为:For Each成员In数组 …Next,适用于不关心数组中的元素个数或者不清楚有多少个元素,使用时要求成员为变体类型变量。当激活窗体时,对score数组中的每个元素进行求和,同时i记下当前计算数组元素的个数。默认数组下标从0开始,题中score数组中含有4个元素,输出4行。
转载请注明原文地址:https://kaotiyun.com/show/WOFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面不属于软件需求分析阶段主要工作的是
窗体上有一个名称为Picture1的图片框控件,一个名称为Label1的标签控件,如图所示。现有如下程序:PublicSubdisplay(xAsControl) IfTypeOfxIsLabelThen xCapti
有关系R如下,其中属性B为主键:则其中最后一个记录违反了
(1)在名称为。Form1的窗体上添加一个名称为Frame1、标题为“框架”的框架,在框架内添加两个名称分别为Option1、Option2的单选按钮,其标题分别为“第一项”、“第二项”。要求通过设置控件的属性将“第二项”初始值设置为被选中,框架为不可用。
窗体上有Command1、Command2两个命令按钮。现编写以下程序:OptionBase0Dima()AsInteger,mAsIntegerPrivateSubCommand1_Click() m=InputBox("请
在窗体上画一个名为Commandl的命令按钮,然后编写如下代码:OptionBase1PrivateSubCommandl_Click()Dimaa=Array(1,2,3,4)j=1F
下面关于标准模块的叙述中错误的是( )。
下列关于InputBox函数的叙述中,错误的是
数据结构主要研究的是数据的逻辑结构、数据的运算和()。
随机试题
善治“皮里膜外之痰”的药为
男,13岁。舌有时出现刺激痛近1年。检查见舌背有3块光滑的红色剥脱区,微凹陷,直径5~10mm。有两块已相连,剥脱区边缘为白色微高起的弧形或椭圆形所包绕,宽约1.5mm,可诊断为
从法的不同层级上可以将其分为()。
已知数列{an}的前n项和Sn=n2+nk(k∈N*),且Sn的最大值为8。求数列{}的前n项和Tn。
Cable MODEM在上传数据和下载数据的速率是不同的。数据下行传输时,一个6MHz的频率可传输的数据率通常能达到_______。
根据域名代码规定,表示教育机构网站的域名代码是
NewFoodsandtheNewWorldInthelast500years,nothingaboutpeople—nottheirclothes,ideas,orlanguages—haschangeda
Accordingtotheartdealer,thepainting______togoforatleastamilliondollars.
IhaveavegetablegardenandeverysummerIenjoyeatingmyownvegetables.OnedaylastsummerIpickedadozencarrots.Usual
Lookatthefollowingstatements(Questions22-26)andlistofbooks(A-E)below.Matcheachstatementwiththecorrectbook,A-E.W
最新回复
(
0
)