首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: Option Base1 Private Sub Form_Click() Dim Arr(3,3)As Integer For i=1To3 For j=1To3 If j=i Or j=3-i+1Then Arr(i,j)=1 Else A
阅读程序: Option Base1 Private Sub Form_Click() Dim Arr(3,3)As Integer For i=1To3 For j=1To3 If j=i Or j=3-i+1Then Arr(i,j)=1 Else A
admin
2019-01-17
42
问题
阅读程序:
Option Base1
Private Sub Form_Click()
Dim Arr(3,3)As Integer
For i=1To3
For j=1To3
If j=i Or j=3-i+1Then
Arr(i,j)=1
Else
Arr(i,j)=0
End If
Next j
Next i
For i=1To3
For j=1To3
Print Arr(i,j);
Next j
Print
Next i
End Sub
程序运行后,如果单击窗体,则输出结果为( )。
选项
A、
B、
C、
D、
答案
D
解析
第一个:For循环给数组Arr赋值。第二个。For循环打印数组各元素的值。在第一个For循环中,数组的下标用变量i表示,上标用变量j表示。If…Else语句对两种情况进行判断,在i等于j的时候或者i和j满足j=3-i+1关系的时候,Arr数组元素被赋值为1,其他情况被赋值为0。可以根据循环语句的执行,代入各变量值算得各元素的值。选D)。
转载请注明原文地址:https://kaotiyun.com/show/7rFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面程序代码:OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger,x,bx=InputBox("请输入一个多位整数")
有下面程序代码:PrivateSubCommand1_Click()a=Array(1,2,3,4,5,6,7,8,9,10)n=UBound(a)Fork=0ToUBound(a)
有下面程序代码:PrivateSubCommand1_Click()DimaAsStringa="COMPUTER"n=search(a,"T")PrintIIf(n=0,"未找到",
下面能够将某个变量声明为局部变量的是
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是( )。
在窗体上画1个命令按钮和1个文本框,其名称分别为Command1和Text1,再编写如下程序:DimssAsStringPrivateSubText1_KeyPress(KeyAsciiAsInteger) IfChr(KeyAsc
下列关于利用通用对话框产生的文件对话框的相关属性的描述中,错误的是( )。
设在工程文件中有一个标准模块,其中定义了如下记录类型TypeBooks NameAsString*10 TelNumAsString*20EndType在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Com
在VisualBasic标准工具栏中,"菜单编辑器"的图标是
把数学表达式2y—b表示为正确的VB表达似乎应该是
随机试题
视神经可分为_________、_________、_________、_________4部分。
女性盆部淋巴主要分为:
下列()使旋风除尘器的效率提高。
关于设备监理工程师应当具备的条件错误的是( )。
上海的某一个房地产开发企业欲到沈阳开发商业地产项目,该企业首先委托某知名市场调查机构就欲开发项目组织了沈阳本地的学者专家、业内人士、普通消费者等多类人群进行了座谈和问卷调查。委托市场研究机构就沈阳的商业地产市场的现状进行分析,就未来趋势进行了预测。并组织媒
会计核算的一般原则中,亦称为有用性原则的是( )。
新学年开始,如果学校选派你担任一年级(3)班班主任工作,面对40张崭新的、渴望知识的面孔,你认为了解全班学生的基本方法是()
使用表6.2中的信息解决下列问题。(1)分别计算大公司股票组合和国库券组合在这段期间的算术平均收益率。(2)分别计算大公司股票组合和国库券组合在这段期间的标准差。(3)计算每年观察到的大公司股票组合相对于国库券组合的风险溢价
设f(x)是周期为4的可导奇函数,且f′(x)=2(x一1),x∈[0,2],则f(7)=____________.
Ultralight(超轻型的)airplanesarearecentdevelopmentinaviationthatprovidewhataviationenthusiastshavelongbeenseeking:a
最新回复
(
0
)