首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下事件过程: Private Sub Form Activate() Dim score(1 To 3)As Integer Dim i As Integer,t As Variant For i:3 To 1 Step-1 score(i)=2*i
编写如下事件过程: Private Sub Form Activate() Dim score(1 To 3)As Integer Dim i As Integer,t As Variant For i:3 To 1 Step-1 score(i)=2*i
admin
2015-05-30
39
问题
编写如下事件过程:
Private Sub Form Activate()
Dim score(1 To 3)As Integer
Dim i As Integer,t As Variant
For i:3 To 1 Step-1
score(i)=2*i
Next i
For Each t In score
Print t;
Next
End Sub
程序运行后窗体上显示( )。
选项
A、6 4 2
B、2 4 6
C、2
D、6
答案
B
解析
本题考查ForEachin循环。ForEachin循环格式为:ForEach变体变量in数组…Next,For Each in循环在本题中的功能是:依次从数组score中取出每一个元素放到变量t中并输出。数组score中的元素从1到3分别为:2 4 6。
转载请注明原文地址:https://www.kaotiyun.com/show/W3Qp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮执行下列程序,其输出结果是()。PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegera=3b=4
在窗体上画一个名称为“Command1”、标题为“计算”的命令按钮,再画7个标签,其中5个标签组成名称为Label1的控件数组;名称为Label2的标签用于显示计算结果,其Caption属性的初始值为空;标签Label3的标题为“计算结果”。运行程序时会自
在一个窗体上添加一命令按钮控件,名为Command1,事件过程如下,则执行结果是()。OptionBase1PrivateSubCommand1_Click()Dima(5)AsIntegerDimk
有如下事件过程:PrivateSubCommand1_Click()b=10DoUntilb=-1a=InputBox("请输入a的值")a=Val(A)b=
在窗体上画一个名称为List1的列表框,一个名称为Label1的标签。列表框中显示若干国家的名称,当单击列表中的某个国家名时,在标签中显示选中国家的名称。下列正确实现上述功能的程序是()。
下列程序的输出结果为______。SubPrin()DimBAsStringA=1B=A&Space(4)&APrintAPrintTrim(B)
编写如下事件过程和函数过程:PrivateSubCommand1_Click()Dimnum(1To6)AsSinglenum(1)=103:num(2)=190:num(3)=0num(4)=32:
设有数组定义语句:Dima(5)AsInteger,并设List1为列表框控件。下列给数组元素赋值的语句错误的是()。
下面的程序代码实现将一个一维数组中元素向右循环移动,移位次数由文本框Text1输入。例如数组各元素的值依次为0,1,2,3,4,5,6,7,8,9,10;移动三次后,各元素的值依次为8,9,10,0,1,23,4,5,6,
下列程序执行的结果为x=25:y=20:z=7Print"S(";x+2*y;")"
随机试题
操作系统是最基本的系统软件,它的主要目的是控制与管理计算机的()和()资源。
用简易的端面锪钻锪钢件时,刀片前角γo=( )。
Mostchildrenwithhealthyappetitesarereadytoeatalmostanythingthatisofferedtothemandachildrarelydislikesfood.【
甲企业向乙银行借款100万元,由丙企业作为保证人。合同签订3个月后,甲与乙协商,将贷款金额增加到150万元,甲和乙通知了丙,丙未予答复。后甲到期不能偿还债务。关于该案中的保证责任承担的说法,正确的是()。
下列财产抵押应办理抵押登记的有()。
根据现行建设工程施工合同示范文本的规定,发包人未按约定时间预付工程款,则承包人应在( )向发包人发出要求预付的通知。
贷款公司对同一借款人的贷款余额不得超过资本净额的15%。()
下列各项中,应列入资产负债表“应付利息”项目的有()。
TCP协议的主要功能是
Lookatthenotesbelow.Someinformationismissing.Youwillhearaconversation.Foreachquestion16-22,fillinthemissing
最新回复
(
0
)