首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行如下程序 Private Sub Commandl_Click() Dim a(5,5)As Integer For i=1 To 5 Forj=1 To 4 a(i,j)=i*2+j If a(i,j)/7=a(i,j)\7 Then
运行如下程序 Private Sub Commandl_Click() Dim a(5,5)As Integer For i=1 To 5 Forj=1 To 4 a(i,j)=i*2+j If a(i,j)/7=a(i,j)\7 Then
admin
2019-06-11
42
问题
运行如下程序
Private Sub Commandl_Click()
Dim a(5,5)As Integer
For i=1 To 5
Forj=1 To 4
a(i,j)=i*2+j
If a(i,j)/7=a(i,j)\7 Then
n=n+1
End If
Nextj
Next
Print n
End Sub
则n的值是
选项
A、2
B、3
C、4
D、5
答案
B
解析
在二重循环中为二维数组赋初值,每个元素的值均为行号*2加上列号;在If语句中进行判断,如果数组元素能被7整除则令计数器n加1,所以整个程序的功能就是统计二维数组中能被7整除的数的个数。
转载请注明原文地址:https://kaotiyun.com/show/xDUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列选项中不属于结构化程序设计原则的是()。
在名称为Form1的窗体上添加两个命令按钮(见图1),其名称分别为Cmdl和Cmd2,编写适当的事件过程。程序运行后,单击命令按钮Cmdl,则可使该按钮移到窗体的左上角(只允许通过修改属性的方式实现);单击命令按钮Cmd2,则可使该按钮在长度和宽度上各扩大
窗体上有一个名称为Picturel的图片框控件,一个名称为Label1的标签控件,如图所示。现有如下程序:PublicSubdisplay(XAsControl)IfTypeOfxIsLabbelThenxCa
假定通过复制、粘贴操作建立了一个命令按钮数组Command1,以下说法中错误的是()。
下面表达式的值不为5的是()。
在考生文件夹下有一个工程文件sjt4.vbp。其窗体上已有部分控件,请按照图1所示添加框架和单选按钮。要求:添加两个框架,名称分别为Frame1、Frame2,在Frame1中添加一个名为Optionl的单选按钮数组,含两个单选按钮,标题分别为“古典音乐”
下面有关标准模块的叙述中,错误的是()。
(1)在考生文件夹下有工程文件sjt3.vbp,其窗体上有1个标题为“计算”的命令按钮,1个标题为“无理数e的近似值”的标签。请再画1个初始内容为空的文本框Text1,如图所示。程序功能为:单击“计算”命令按钮,则计算无理数e的近似值,并将结果显示在Tex
利用属性窗口为窗体的下面4个属性设置了值,其中错误的设置是()。
设循环队列为Q(1:m),其初始状态为front=rear=m。经过一系列入队与退队运算后,front=30,rear=10。现要在该循环队列中作顺序查找,最坏情况下需要比较的次数为
随机试题
WhichofthefollowingkingswasresponsibleforthecompleteestablishmentofthefeudalsysteminEngland?()
Manypost-80scouplesarecomplainingthatgoingtothemovies,shoppingorattendingpartieshavebecomeimpossiblesincetheir
最容易发生缺血性骨坏死的是
A、待验药品库、退货药品库B、不合格药品库C、合格药品库、待发药品库、零货称取库D、近效期药品库药品储存中,绿色的色标代表
运用动态控制原理控制施工进度的步骤有()。
钢板桩围堰施打顺序一般是()。
我认为你们的建议和他们的一样有价值。(as…as)
1996年2月8日凌晨,甲县粮食局职工宿舍楼刘某住房发生火灾,经扑救灭火,未造成严重损失。当日上午起,甲县公安局消防科对火灾事故进行调查和勘察,2月14日,该公安局消防科作出《火灾原因认定书》认定这起火灾是从刘某房内燃起的,系刘某使用电器不慎引起火灾。但该
a+b+c=2。(1)a、b、c均为有理数,且;(2)a、b、c均为实数,且a-b=8,ab-c2+16=0。
ManyvisitorspraisedthemagnificentarchitectureofthePalace______theForbiddenCity.
最新回复
(
0
)