首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行如下程序 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
44
问题
运行如下程序
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全国计算机二级
相关试题推荐
下列程序段执行后,输出的结果是()。Fork1=0To4y=20Fork2=0To3y=10Fork3=0To2y=y+10Nextk3
以下关于函数过程的叙述中,正确的是
下面控件中,没有Caption属性的是
下列关于栈的叙述中,正确的是
设有下面的语句:PrintIIf(x>0,1,IIf(x<0,-1,0))与此语句输出结果不同的程序段是
编写如下程序:PrivateSubCommandl_Click()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>60Thenr=2El
设窗体上有,1个滚动条要求单击滚动条右端的按钮一次,滚动块移动一定的刻度值,决定此刻度值的属性是
PrintRight("VBProgramming",2)语句的输出结果是
下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ABCDCD”Functiondelchar(strAsString,chAsStr
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:PrivateTypePersonnameAsString*8maj
随机试题
A.缺铁性贫血B.巨幼细胞性贫血C.自身免疫性溶血性贫血D.珠蛋白生成障碍性贫血E.阵发性睡眠性血红蛋白尿男,22岁,贫血,黄疸,脾肿大。血红蛋白70g/L,白细胞5.5×109/L,网织红细胞计数0.09,Coombs试验阳性,可诊
机电产品的印刷电路板、显示单元及其支撑底板、金属外壳等经过168h的耐盐雾腐蚀性能试验后,应无明显诱蚀现象,印刷电路板经过24h自然晾干后应功能正常()。
建设工程文件档案资料的特征有()。
下列不属于绩效考核常见的权重设计方法的是()。
把下而的六个图形分为两类,每每一类图形都有各自的共同特征或规律,分类正确的一项是:
文化对教育的制约支配作用尤为明显地表现在()。
在H公司,从董事长、总经理、总会计师到每一个人,没有人信任所有的人。董事长信任总经理;总会计师不信任董事长;总经理信任所有信任董事长的人。如果上述断定为真,那么以下哪项不可能为真?Ⅰ.总经理不信任董事长。Ⅱ.总经理信任总会计师
乙在甲提存机构办好提存手续并通知债权人丙后,将2台专业相机、2台天文望远镜交甲提存。后乙另行向丙履行了提存之债,要求取回提存物。但甲机构工作人员在检修自来水管道时因操作不当引起大水,致乙交存的物品严重毁损。下列哪一选项是错误的?()[2
μC/OS—II操作系统可以定义的最大任务数是64个,最高优先级定为__________【71】,最低优先级取值为实际定义的最大任务数减__________【72】。
Astudyofthephysicalactivityhabitsof4563adultsfoundthatthosewhosaidtheydidthemosthouseworkwerealsothelarg
最新回复
(
0
)