首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有命令按钮Commandl的单击事件过程,代码如下: Private Sub Command1_Click() Dim a(3,3)As Integer For i=1 To 3 Forj=1 To 3 a(i,j
设有命令按钮Commandl的单击事件过程,代码如下: Private Sub Command1_Click() Dim a(3,3)As Integer For i=1 To 3 Forj=1 To 3 a(i,j
admin
2020-10-14
39
问题
设有命令按钮Commandl的单击事件过程,代码如下:
Private Sub Command1_Click()
Dim a(3,3)As Integer
For i=1 To 3
Forj=1 To 3
a(i,j)=i*j+i+j
Nextj
Next i
Sum=0
For i=1 To 3
Sum=Sum+a(i,4一i)
Next i
MsgBox Sum
End Sub
运行程序,单击命令按钮,消息框输出结果是( )。
选项
A、7
B、8
C、15
D、22
答案
D
解析
本题考查VBA中二维数组和循环的知识。本题中的第一个二重循环为二维数组进行了赋值。第二个循环完成累加,关键是分析出累加了哪些元素-由循环体可以看出,实际上3次累加分别累加的是a(1,3)、a(2,2)、a(3,1),实际上就是二维数组的对角线,累加和为7+8+7=22。
转载请注明原文地址:https://www.kaotiyun.com/show/wzSp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个数据库文件“samp3,accdb”,里面已经设计了表对象“tEmp”、查询对象“qEmp”和窗体对象“fEmp”。同时,给出窗体对象“fEmp”上两个按钮的单击事件代码,请按以下要求补充设计。(1)将窗体“fEmp”上名称为“tS
在考生文件夹下,“sampl.accdb”数据库文件中已建立了3个关联表对象(名为“职工表”、“物品表”和“销售业绩表”)和一个窗体对象(名为“fTest”)。请按以下要求,完成表和窗体的各种操作。(1)分析表对象“销售业绩表”的字段构成、判断并设置其主
体检表中有日期/时间类型数据“体检时间”,若规定在体检4周后复检,建立生成表查询,生成列“复检时间”要自动给出复检日期,正确的表达式是()。
若存在关系STUD(学号,姓名,性别,年龄),下列函数Func的功能是()。FunctionFunc()DimstrSQLAsStringstrSQL=“ALTERTABLESTUDADDCO
用于获得字符串S从第3个字符开始的2个字符的函数是()。
设循环队列的存储空间为Q(1:50),初始状态为front=rear=50。经过一系列正常的操作后,front-1=rear。为了在该队列中寻找值最大的元素,在最坏情况下需要的比较次数为
下列关于二叉树的叙述中,正确的是()。
在窗体中绑定控件,其含义是()。
下面对软件测试和软件调试有关概念叙述错误的是
软件测试的目的是
随机试题
有以下程序:#include<stdio.h>main(){inty=9;for(;y>0;y--)if(y%3==0)printf("%d",--y);}程序运行后的输出结果是()。
丰富:贫乏
女性,54岁。缓起发热,咳嗽,痰呈脓性,伴腥臭味,每日约150ml。病程已10天,多种抗生素治疗不见改善。X线示右下肺叶后基底段团块状影,伴空洞和液平。2周前曾有拔牙史。为了解有无气道阻塞,宜选择下列哪项检查
某项工作有三项紧后工作,其持续时间分别为4d、5d、6d;其最迟完成时间分别为18d、16d、14d,本工作的最迟完成时间是()d。
某公司采用集权与分权相结合的财务管理体制,根据我国企业的实践,公司总部一般应该集权的有()。
根据支付结算法律制度的规定,下列账户中,需要在开户后5个工作日内到中国人民银行当地分支行备案的是()。
集体奖励的条件大体包括:( )。
下列各句中,没有语病的一项是()。
A、Shethinksnothingcanbedoneaboutit.B、Shethinksthemanshoulduseperfume.C、Shewilltalktotheownersverysoon.D、S
李时珍是明朝卓越的医药学家(pharmacologist),也是世界文化史上伟大的自然科学家。他精通医术,并且具有严谨的科学态度。李时珍钻研了很多医学上的经典书籍,并结合自身经验和调查研究,历时27年撰写了著名的《本草纲目》(CompendiumofM
最新回复
(
0
)