首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行如下程序 Private Sub Command1_Click() Dim a(5, 5) As Integer For i = 1 To 5 For j = 1 To 4 a(i, j
运行如下程序 Private Sub Command1_Click() Dim a(5, 5) As Integer For i = 1 To 5 For j = 1 To 4 a(i, j
admin
2020-01-02
45
问题
运行如下程序
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
解析
程序的功能:利用二重For循环给二维数组a中每个元素赋值,然后通过If语句"a(i,j)/7=a(i,j)\7"判断a(i,j)的值是否能被7整除,若能被7整除,则利用语句"n=n+1",统计满足条件的a(i,j)的个数。程序开始时,利用二重循环和表达式"a(i, j) = i * 2 + j"给数组元素赋值,通过计算可以得知:a(2,3)=2*2+3=7;a(3,1)=2*3+1=7;a(5,4)=2*5+4=14,3个值满足条件,即n的值为3,故B选项正确。
转载请注明原文地址:https://kaotiyun.com/show/W1Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面程序代码:PrivateSubCommandl_Click()a=Array(1,2,3,4,5,6,7,8,9,10)n=UBound(a)Fork=0ToUBound(a)/2
设在一个工程的窗体中有如下代码:PubllcxAsIntegerPrivateSubForm_Load()DimyAsIntegerEndSub在该工程的标准模块的声明部分有代码:PublicaAsInteger:
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性,该属性为
下面关于标准模块的叙述中错误的是
为计算an的值,某人编写了函数power如下:PrivateFunctionpower(aAsInteger,nAsInteger)AsLongDimPAsLongP=aFork=1Ton
某人编写了下面的程序,希望能把Textl文本框中的内容写到out.txt文件中PPrivateSubCommandl_Click()Open”out.txt”ForOutputAs#2Print”Text”
设一棵满二叉树共有15个结点,则在该满二叉树中的叶子结点数为()。
在数据流图中,带有箭头的线段表示的是()。
在数据库系统的组织结构中,下列()映射把用户数据库与概念数据库联系了起来。
随机试题
有机磷酸酯类急性中毒解救原则错误的是
钻削深孔时,应采用()切削液。
下列关于授权的说法中,正确的是()
对侦查人员的回避作出决定前,侦查人员()对案件的侦查。
女性21岁,足球运动员,比赛中被对方球员铲球时踢中左胫骨上端后外侧,当即跌倒,感左膝剧痛,不能奔跑。经休息1周后,左膝仍疼痛,并有肿胀,膝关节内侧皮下淤血,行走不稳。经检查发现外侧加压试验阳性,前抽屉试验阳性,内侧McMurray试验阳性。初步诊断是(
不能与氟化亚锡同时使用的药物是
在印花税纳税审核过程中,下列说法不正确的是()。
董某是某机关党委办公室主任。一天,办公室收到来自下级机关××局党委的一份文件,内容是××局党委关于成立一个专家咨询委员会的打算。董某在该文件眉首写了“请领导办公会议讨论决定”字样。一周后,该机关领导经过研究,同意××局党委的意见,让办公室给××局党委一个答
Doctor:Well,whatcanwedoforyoutoday?Patient:Oh,I’maninfectioninmygum,Doctor.Doctor:Inyourgum?Patient:Uph
Whatisthenewsmainlyabout?
最新回复
(
0
)