首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行如下程序 Private Sub Command1_Click() Dim a(5,5)As Integer For i=1To5 For j=1To4 a(i,j)=i*2+j If a(i,j)/7=a(i,j)\7Then n=n+1 End I
运行如下程序 Private Sub Command1_Click() Dim a(5,5)As Integer For i=1To5 For j=1To4 a(i,j)=i*2+j If a(i,j)/7=a(i,j)\7Then n=n+1 End I
admin
2020-04-18
53
问题
运行如下程序
Private Sub Command1_Click()
Dim a(5,5)As Integer
For i=1To5
For j=1To4
a(i,j)=i*2+j
If a(i,j)/7=a(i,j)\7Then
n=n+1
End If
Next j
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/XaTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有1个名称为Commandl的命令按钮,事件过程如下:PrivateSubCommandl_Click()Dimx%,y%,z%x=InputBox(”请输入第1个整数”):y=InputBox(”请输入第2个整数
设有以下定义语句:PrivateTypepointxAsIntegerYAsIntegerEndTypeDimaAspoint下面语句中正确的是
在窗体上画一命令按钮和一文本框,其名称分别为Commandl和Textl,然后编写如下程序:FunctionFun(xAsInteger,YAsInteger)AsIntegerFun=IIf(x
编写如下程序:PrivateSubCommandl_Click()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>60
在下面语句或函数中,不能描述选择结构的是
将窗体的KeyPreview属性设为True,然后编写如下程序:PrivateSubForrn_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubP
窗体上有名称为Commandl的命令按钮,名称分别为Labell、Label2、Label3的标签。编写如下程序:PrivatexAsIntegerPrivateSubCommandl_Click()Stat
设窗体上有1个名称为HScroll1的水平滚动条,其Max、Min属性分别设置为100、1;有2个名称分别为Option1、Option2的单选按钮,其标题分别为“30”、“50”:还有下面程序代码:PfivmeSubOptionl_Click()
为使文本框具有初始值“VB”,在设计阶段正确的操作是
构成计算机软件的是
随机试题
血栓闭塞性静脉炎的护理措施不妥当的是()。
两肺满布湿啰音最常见于
解表宜生用,平喘宜蜜炙用的药是
某企业投资18000万元人民币兴建煤炭深加工项目,项目审批核准部门对该项目招标内容的核准意见见表2—3。招标人组织该项目建设过程中,能否委托招标代理机构组织整个项目采购?
企业质量管理体系获准认证的有效期为()年。
以下属于纳税人权利的有()。
教育从生产劳动中第一次分离的标志是()。
【2013吉林乙NO.23】下列各句中没有歧义的一句是:
销售经理小李通过Excel制作了销售情况统计表,根据下列要求帮助小李对数据进行整理和分析。对工作表进行页面设置,指定纸张大小为A4、横向,调整整个工作表为1页宽、1页高,并在整个页面水平居中。
Suchmentalfatiguecanbeasthreateningasaheartattack.Recentevidenceindicatesthatsleepinessisaleadingcauseoftra
最新回复
(
0
)