首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行如下程序 Private Sub Command1_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,
运行如下程序 Private Sub Command1_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,
admin
2020-07-22
48
问题
运行如下程序
Private Sub Command1_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)\7 Then
n=n+1
End If
Next j
Next
Print n
End Sub
n的值是( )。
选项
A、2
B、3
C、4
D、5
答案
B
解析
VB中"/"是浮点除法运算符,"\"是整数除法运算符,程序中的条件表达式a(i, j)/ 7=a(i, j))成立时说明这个数能够被7整除,程序即是统计这个二维数组中能被7整除的数的个数。数组元素值在i=1时为(3,4,5,6),i=2时为(5,6,7,8),i=3时为(7,8,9,10),i=4时为(9,10,11,12),i=5时为(11,12,13,14),其中能够被7整除的数有7、7、14共3个。因此答案为B。
转载请注明原文地址:https://kaotiyun.com/show/rNHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定编写了如下的Sub过程:PublicSubProc(a()AsInteger)StaticiAsIntegerDoa(i)=a(i)+a(i+1)i=i+1LoopWhilei
设a、b都是自然数,为求a除以b的余数,某人编写了以下函数:Functionfun(aAsInteger,bAsInteger)Whilea>b a=a-bWendfun=aEndFunction在调试时发现函数是错
考生文件夹下有一个工程文件sjt5.vbp。运行程序后,从文件中读出数据,将其放入一个5×5的二维数组a中。请编写程序,找出数组a中每行的最大值及该值在行中的次序(列下标),并将所找到的结果分别保存到一维数组b、c中(a中第一行的最大值保存在b(1)中,最
下面描述中不属于数据库系统特点的是
现有程序如下:OptionBase1PrivateSubForm_Click() Dimx(5,6)AsInteger,y(5)AsInteger Fori=1To5 Forj=1To6 x(i
设有如下事件过程:PrivateSubFormMouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=2ThenPo
有如下数据定义语句:Dima,bAsIntegerDimx%,yasInteger执行上述语句后,不是整型变量的是
在窗体上画一个命令按钮,名称为Command1,然后编写如下代码:OptionBase0PrivateSubCommand1_Click() DimA1(4)AsInteger,A2(4)AsInteger Fork=0To
VB中,若没有显式声明变量的数据类型,则默认的类型是
随机试题
下列与“气主煦之”无关的是()(2007年第8题)
简述张元幹《贺新郎》(梦绕神州路)一词的艺术特点。
Likealllargecities,NewYorkhasoldproblemstosolveand【21】onestoface.Slums(贫民窟)mustbecleared,andnewhousingconst
进行肺功能显像检查,说法正确的是
宋楚雄与孙五花离婚纠纷一案,经K市L县人民法院调解,双方当事人就离婚问题达成协议,同意解除双方的婚姻关系,并签收了人民法院送达的调解书。在此情况下,该调解书对方双方当事人有何约束力?
某县是国家级历史文化名城,该县单独编制的历史文化名城保护规划,应报()审批。
上市公司同次发行的相同条款优先股,每股发行的条件、价格和票面股息率应当相同。()
新课程倡导研究性学习、合作学习、教学对话等教学方式,其主要理论依据是()
capacityforindependentinnovation
Thewomanmaybuysomeclothesaslongastheyfither.
最新回复
(
0
)