首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行如下程序 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
43
问题
运行如下程序
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全国计算机二级
相关试题推荐
在窗体上画一个名称为Commandl的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:PrivateXAsIntegerPrivateSubCommandl_Click()X=5:
设窗体上有名称为Optionl的单选按钮,且程序中有语句:IfOptionl.Value=TrueThen下面语句中与该语句不等价的是()。
下面有关标准模块的叙述中,错误的是()。
在名称为Form1的窗体上添加一个名称为Shape1的形状控件,要求在属性窗口中将其形状设置为椭圆,其短轴(垂直方向)、长轴(水平方向)的长度分别为800、1600。把窗体的标题改为“Shape控件”,窗体上无最大化、最小化按钮。程序运行后的窗体如图所示。
窗体如图1所示。要求程序运行时,在文本框Textl中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:PrivateSubCommandl_Click()
在考生文件夹下有一个工程文件sjt5.vbp,界面如图所示,其功能如下:①单击“读数据”按钮,则把考生文件夹下文件in5.dat中的12组整数(其中每组含有10个数,共计120个整数)读到数组a中;②单击“计算”按钮,则对每组数求平均值
(1)在名称为Form1、标题为“球类项目”且没有最大化和最小化按钮的窗体上画1个名称为Combol的组合框。组合框中的文本内容为空,表项内容有“乒乓球”、“羽毛球”和“网球”3项。运行后的窗体如图所示。注意:存盘时必须存放在考生文件夹下,工程文
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为()。
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是:分别统计7*7数组四周元素之和及四周元素中能够被7整除的元素的个数,并将统计结果在相应的标签中显示。请仔细阅读已有程序,然后在标出的位置编写适当的程序,实现上述的功能。 要求:不得修改原有程
若要把窗体上命令按钮Command1的状态设置为不可用,应该执行的命令是()。
随机试题
覆颌、覆盖有重要的生理意义,除了
关于石灰稳定土基层,下列叙述正确的有()。
公民从出生时起到死亡时止,具有民事行为能力,依法享有民事权利,承担民事义务。()
2013年5月,甲、乙、丙、丁分别出资600万元、80万元、120万元、200万元设立了A有限责任公司;公司章程约定按照出资比例行使表决权。自2014年开始,公司的生产经营状况严重恶化,股东之间存在严重冲突,一直无法召开股东会,甲提议通过股权转让摆脱困境被
下列选项中既能够适用于最简单的组织结构也能适用于十分复杂的组织结构的组织协调机制是()。
从我国古代的五声调式看,“65|3565|656”是()。
教育史上,为班级授课制的确立奠定了理论和实践基础的教育家是()。
注意事项1.本题本由给定资料与作答要求两部分构成。考试时限为180分钟。其中,阅读给定资料参考时限为50分钟,作答参考时限为130分钟。满分150分。2.监考人员宣布考试开始时,你才可以开始答题。3.请在题本、答题卡指定位置填
读写硬盘时,下列哪一个操作花费时间最短?()
Oneofthemostauthoritativevoicesspeakingtoustodayisthevoiceoftheadvertisers.Itsstridentclamourdominatesourli
最新回复
(
0
)