首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行如下程序 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 E
运行如下程序 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 E
admin
2019-01-17
39
问题
运行如下程序
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/BMFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下变量名中合法的是( )。
软件设计中模块划分应遵循的准则是( )。
假定有如下的程序段:DimintVarAsIntegerintvar=TruePrintintVar则输出结果是
以下叙述中错误的是( )。
以下关于窗体的叙述中错误的是( )。
在窗体模块的声明部分声明变量时,不能使用的关键字是
设有如下的程序段:n=0Fori=1To3 Forj=1Toi Fork=jTo3n=n+1 Nextk NextjNexti执行上面的程序段后,n的值为( )。
如果要在窗体上画一个标签,应在工具箱窗口中选择的图标是( )。
A、选择B、投影C、交D、并D关系T中的元素与关系R和关系S中不同元素的总和,因此为并操作。
一个栈的初始状态为空。现将元素A,B,C,D,E依次入栈,然后依次退栈三次,并将退栈的三个元素依次入队(原队列为空),最后将队列中的元素全部退出。则元素退队的顺序为
随机试题
行政法律责任
肝性脑病时,血氨主要来源于
引起维生素D缺乏性佝偻病的最主要原因是
排烟管道采用不燃材料制作,常用的排烟管道采用镀锌钢板加工制作,厚度按高压系统要求,并应采取隔热防火措施或与可燃物保持不小于()mm的距离。
在以财务报告为目的的评估业务中,资产减值测试的评估对象通常是()。
傣族最有特色的建筑是吊脚楼。()
下列属于体罚学生的情形有()。
下列关于行政强制执行的说法正确的是()。
设f(x)可导,F(x)=f(x)(1+|sinx|),若使F(x)在x=0处可导,则必有()
在编制监理实施细则时,()是最常用且易组织的方式。
最新回复
(
0
)