首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim a1(4,4),a2(4,4) For i=1 To 4 Forj=1 To 4
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim a1(4,4),a2(4,4) For i=1 To 4 Forj=1 To 4
admin
2020-06-25
66
问题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a1(4,4),a2(4,4)
For i=1 To 4
Forj=1 To 4
a1(ij)=i+j
a2(i,j)=a1(i,j)+i+j
Next j,i
MsgBox(al(3,3)*a2(3,3))
End Sub
程序运行后,单击命令按钮,消息框输出的是( )。
选项
A、48
B、72
C、96
D、128
答案
B
解析
本题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值,最后求两个数组元素值的积。我们只需要注意这两个数组元素在循环中被赋了什么值,当i=3,j=3时,alf3,3)=3+3=6,a2(3,3)=a1(3,3)+3+3=12,所以最后二者之积为72。
转载请注明原文地址:https://www.kaotiyun.com/show/YQcp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个数据库文件“samp1.accdb”,里面已经设计好表对象“tStud”。请按照以下要求,完成对表的修改。(1)设置数据表显示的字体大小为14、行高为18。(2)设置“简历”字段的设计说明为“自上大学起的简历信息”。
在Access数据库中,表是由
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码:PrivateSubCommandl_Click()s=”ABBACDDCBA”ForI=6To2.Step-2x=Mid(s,I,
“数学管理”数据库中有学生表、课程表和选课表,为了有效地反映这三张表中数据之间的联系,在创建数据库时应设置
VBA程序的多条语句可以写在一行中,其分隔符必须使用符号
下列不属于类模块对象基本特征的是
在学生表中建立查询,“姓名”字段的查询条件设置为“IsNull”,运行该查询后,显示的记录是
在考生文件夹下有一个数据库文件“samp3.accdb”,其中存在设计好的表对象“tStud”和查询对象“qStud”,同时还设计出以“qStud”为数据源的报表对象“rStud”。清在此基础E按照以下要求补充报表设计。(1)在报表的报表页眉节区
在考生文件夹下有一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、宏对象“mEmp”和报表对象“rEmp”。同时,给出窗体对象“fEmp”的“加载”事件和“预览”及“打印”两个命令按钮的单击事件代码,请按以下
下列关于数据库设计的叙述中,错误的是
随机试题
x线照片影像形成参数的叙述,错误的是
当用户的光标进入按钮范围,触发的事件是
精心地护持自己的善意,精心地保持自己的善行,使其不断地积累成为个人品德。这种修养方法是
眼球外肌包括哪些?
宫颈癌放疗失败的患者中,盆腔内复发所占比例为
下列选项所表述的内容,与“种瓜得瓜,种豆得豆”不属于同类判断的是()。
张海迪5岁开始,就患了脊椎血管瘤,导致其胸口下面全部瘫痪。就这样,张海迪从5岁开始,就在轮椅上度过。但张海迪仍没有因瘫痪而向病魔屈服。恰恰相反,她不但没有倒下,还自学了小学、中学的主要课程,另外还学了日语、英语、德语,还有世界语,还学了医学。她当过医生,翻
Theideathatgovernmentshouldregulateintellectualpropertythroughcopyrightsandpatentsisrelativelyrecentinhumanhist
A、 B、 C、 A这道题用否定疑问句的方式来询问是否是电话铃响了,(A)项的回答“谢谢你,我刚才没听见”是符合题意的。(B)项使用了由题干中phone易联想到的call来迷惑考生。(C)项使用题干中出现的ring来干扰
Thecostsassociatedwithnaturaldisastersareincreasingrapidly.Asaresult,officialsingovernmentandindustryhavefocus
最新回复
(
0
)