首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序代码: Option Explicit Private Sub Form_Click() Dim x As Variant Dim i As Variant x=Array(50,27,69,80,45)
编写如下程序代码: Option Explicit Private Sub Form_Click() Dim x As Variant Dim i As Variant x=Array(50,27,69,80,45)
admin
2020-02-27
15
问题
编写如下程序代码:
Option Explicit
Private Sub Form_Click()
Dim x As Variant
Dim i As Variant
x=Array(50,27,69,80,45)
For Each i In x
If i Mod 2=0 Then
Print i
End If
Next i
End Sub
以下叙述中正确的是( )。
选项
A、程序的功能是输出数组x中的所有奇数
B、将语句For Each i In x改为For i=0 To 5,程序功能不变
C、变量x和i也可定义为Integer类型,程序功能不变
D、程序的功能是输出数组x中的所有偶数
答案
D
解析
程序开始时定义了一个默认数组x和一个变体型变量i,接着通过Array函数给数组赋值,程序的功能是通过For Each……Next循环依次遍历数组中的元素,若某个元素的值能被2整除,则输出该元素,故最终会输出50和80两个值,D选项叙述正确,其他3项叙述均错误。本题选择D选项。
转载请注明原文地址:https://kaotiyun.com/show/dUTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列数据结构中,不能采用顺序存储结构的是()。
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:PrivateSubText1—KeyUp(KeyCodeAsInteger,ShiftAsInteger)DimcAsStri
窗体上有名称分别为Text1、Text2的文本框,名称为Command1的命令按钮。运行程序,在Text1中输入“FormList”,然后单击命令按钮,执行如下程序:PrivateSubCommandl.Click()Text2.Text=UCas
能够存放组合框的所有项目内容的属性是()。
(1)在名称为Form1的窗体上画两个标签(名称分别为Label1和Labe12,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2,初始内容均为空)和一个命令按钮(名称为Command1,标题为“显示”)。然后编写命令按钮的Cl
如下关于变体类型变量的叙述中,错误的是( )。
在排序过程中,每一次数据元素的移动会产生新的逆序的排序方法是()。
关系数据库管理系统能实现的专门关系运算包括()。
设栈的顺序存储空间为S(0:49),栈底指针bottom=49,栈顶指针top=30(指向栈顶元素)。则栈中的元素个数为
设:a=12,b=5,c=7,表达式x=(a\c+aModb)+Int(13/5)的值是( )。
随机试题
关于全酶的叙述,下列哪些是正确的
某房地产开发公司开发的某楼盘5号楼的业主入住后,发现家中散发怪味且无法散去,经检测确定是施工所用建筑材料污染超标所致。现5号楼所有业主将开发商告上法院,要求解决异味问题并赔偿医疗费、住房费等各项损失。在诉讼过程中,法院将施工方某住宅建筑工程公司追加到诉讼中
背景我国北部地区某机场等级为4E,根据要求,需新建一条检修专用巡场路,路宽6m,距离跑道中心线为70m。在施工前,施工单位针对不停航施工组织的特点,制订了详细的施工方案。确定此项不停航施工每天作业的主要程序。
下列说法正确的是()。
决定和影响利率变动的因素有很多,包括社会平均利润率、借贷资金的供求状况和微观因素等,其中,微观因素主要包括()。[2009年5月二级真题]
下列机构中,不符合股权投资基金管理人的组织形式规范的是()。
东恒上市公司2005年在深圳上市,在2011年度利润分配及资本公积转增资本实施公告中披露的分配方案主要信息如下:每10股送3股派发现金股利0.6元(含税,送股和现金股利均按l0%代扣代缴个人所得税,送股的计税依据为送的股票的票面金额),转增5股。股权登记日
坚持真理尺度和价值尺度的辩证统一,要求我们在实践中必须坚持和弘扬()
在人事管理数据库中工资与职工之间存在的关系是
A、Hedislikesmuseumsandgalleries.B、Hedoesnotcareaboutthehotweather.C、Goingtothebeachisthebestchoice.D、Hedoe
最新回复
(
0
)