首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: Option Base 1 Private Sub Form Click() DimArr(3,3)As Integer For i=1 To 3 For i=1 To 3 Ifj=i Or j=3一i+1 Then Arr(i,j)=
阅读程序: Option Base 1 Private Sub Form Click() DimArr(3,3)As Integer For i=1 To 3 For i=1 To 3 Ifj=i Or j=3一i+1 Then Arr(i,j)=
admin
2019-04-29
53
问题
阅读程序:
Option Base 1
Private Sub Form Click()
DimArr(3,3)As Integer
For i=1 To 3
For i=1 To 3
Ifj=i Or j=3一i+1 Then
Arr(i,j)=1
Else
Arr(i,j)=0
End If
Next i
Next i
For i=l To 3
For i=1 To 3
Print Arr(i,j);
Next i
Print
Next i
End Sub
程序运行后,如果单击窗体,则输
选项
A、1 1 1
1 1 1
1 1 1
B、0 0
0 0 0 0
0 0 0
C、1 0 0
0 1 0
0 0 1
D、1 0 1
0 1 0
1 0 1
答案
D
解析
本题是用一个二重循环为二维数组赋值,只有满足下标j=i或者j=3.i+1才将其设置为1,否则设置为0,如果写出这个二维数组可以看出,两个对角线的元素被设置成1.
转载请注明原文地址:https://kaotiyun.com/show/O2Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在设计阶段,假定在图片框Picturel中装入了一个图形,为了删除该图片框控件,应采用的正确操作是
设A、B、C是三角形的3条边,则以下表示“任意两边之和大于第三边”的布尔表达式是
窗体上有一个名称为Labell的标签:一个名称为Timerl的计时器,其Enabled和Interva属性分别为True和1000。编写如下程序:DimnAsIntegerPrivateSfbTimer1Timer()ch=Chr(n+As
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下:PrivateSubFormLoad()PrivateSubTimerl_Tmer()Shapel.Top=0
设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是
窗体上有一个名称为VScrolll的滚动条,当用鼠标拖动滚动条中的滚动块时,触发的事件是
一棵二叉树中共有80个叶子结点与70个度为1的结点,则该二叉树中的总结点数为
以下合法的VB变量名是
如下关于变体类型变量的叙述中,错误的是
VisualBasic集成环境由若干窗口组成,其中不能隐藏(关闭)的窗口是
随机试题
根据责任中心的权限范围及业务活动的特点,责任中心可以分为成本中心、利润中心和投资中心。【】
下述哪项情况下肾小球滤过率不减少
珠海甲公司与澳门乙公司订立的合同中约定有关争议在中国内地仲裁。乙公司在内地和澳门均有营业机构。双方发生争议后,仲裁庭裁决乙公司对甲公司进行赔偿。乙公司未在规定的期限内履行仲裁裁决。关于甲公司对此采取的做法,下列哪些是正确的?()
起重机械机体毁坏事故可能造成机体严重损坏和人身伤亡。下列属于机体毁坏事故的有()。
某建筑公司与某开发公司签订的施工承包合同中约定了解决纠纷的方法,双方同意采取仲裁的方式来解决纠纷,2006年1月2日,开发公司以建筑公司不具备资质为由,到法院起诉请求确认该合同无效,但法院裁定不予受理。这体现了仲裁协议()。
下列表述中,不符合《合伙企业法》规定的是()。
根据安德森的研究,影响人际吸引最重要的人格品质是()。
“尊重劳动、尊重知识、尊重人才、尊重创造”的重大方针是在()上确立的。
某蔬菜公司现有土豆5吨,因考虑近期涨价因素,临时新购进X吨。原库存土豆销售利润为1000元每吨,新购进土豆利润为800元每吨,将现有全部土豆的一半出售,假设利润最多为M,最少为N,以下哪个坐标图最能准确描述M、N分别与X的关系?
Excusesrepresentadesiretohangontothelifeyouhavenow.Anexcuseisanobstaclethatyouchoosetoplace【C1】______front
最新回复
(
0
)