首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行如下程序 Private SubCommand1_Click() Dim a(5,5)As Integer For i=1 To 5 For j=1 To 4 a(i,j)=i*2+j If a(i,j)/7=a(i,j)\7Then n=n+1 En
运行如下程序 Private SubCommand1_Click() Dim a(5,5)As Integer For i=1 To 5 For j=1 To 4 a(i,j)=i*2+j If a(i,j)/7=a(i,j)\7Then n=n+1 En
admin
2019-07-30
65
问题
运行如下程序
Private SubCommand1_Click()
Dim a(5,5)As Integer
For i=1 To 5
For j=1 To 4
a(i,j)=i*2+j
If a(i,j)/7=a(i,j)\7Then
n=n+1
End If
Nex tj
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/oZUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关系表达式中,其值为True的是
下面有关标准模块的叙述中,错误的是
设窗体上有Text1、Text2两个文本框,并编写了下面的程序代码:PrivateSubText1_KeyPress(KeyAsciiAsInteger)If"A"<=Chr(KeyAscii)AndChr(KeyAscii)<="Z"Th
窗体上有一个名称为Combo1的组合框,要求在其编辑区输入文本并按回车键后,编辑区中的文本被添加到列表中。下面能实现这一功能的是
语句:PrintAsc(Chr$(Mid$("98765432",4,2)))的输出是
以下表达式与Int(3.5)的值相同的是
设有如下变量声明语句:Dima,bAsBolean则下面叙述中正确的是
下列不属于软件工程3个要素的是.()。
以下描述中,不是线性表顺序存储结构特征的是()。
下列说法中,错误的是
随机试题
Englishspeakerspickuppitchintherighthemispheresoftheirbrains,butspeakersofcertainotherlanguagesperceiveiton
对偶三角瓣主要适用于
某男,18岁,夏季贪凉饮冷,遂致外感于寒,内伤于湿,症见恶寒发热,无汗头痛,头重身倦,胸闷泛恶,舌苔薄白而腻。医师诊为阴暑,处方为香薷、厚朴、白扁豆,水煎服。为了增强上方行气宽中、发散风寒之力,最宜选配的药物是()
退伙人对其退伙前合伙企业的债务()。
士兵在战场上穿迷彩服以达到隐蔽的效果,主要利用了知觉的()。
怎样加强高校党委民主集中制建设?
《中共中央国务院关于打赢脱贫攻坚战的决定》强调,打赢脱贫攻坚战要坚持以下基本原则:坚持党的领导,夯实组织基础;坚持政府主导,增强社会合力;坚持精准扶贫,提高扶贫成效;坚持保护生态,实现绿色发展;坚持群众主体,激发内生动力;坚持因地制宜,创新体制机制。
设A,B是两个随机事件,且P(A)=0.4,P(B)=0.5,P(A|B)==_______。
在Word中,要复制整个屏幕窗口内容按()键。
有如下模板声明:template<typenameT1,typenameT2>classA;下列声明中,与上述声明不等价的是()。
最新回复
(
0
)