首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim A(3, 3) As Integer For j = 1 To 3 For k = 1 T
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim A(3, 3) As Integer For j = 1 To 3 For k = 1 T
admin
2015-10-23
30
问题
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub Command1_Click()
Dim A(3, 3) As Integer
For j = 1 To 3
For k = 1 To 3
A(j, k) = (j - 1) * 3 + k
Next k
Next j
For j = 2 To 3
For k = 1 To 2
Print A(k, j);
Next k
Print
Next j
End Sub
运行程序,单击命令按钮,输出结果是
选项
A、2 5 3 6
B、2 3 5 6
C、4 7 5 8
D、4 5 7 8
答案
A
解析
用Dim定义4*4的整型数组A(3,3)(默认情况下数组的下标从0开始),并将其元素初始化为0。程序中有两个多重循环:第一个多重循环给二维数组A(3,3)中的第二行第二列至第四行第四列的数据分别进行赋值,A(1,1)=1,A(1,2)=2,A(1,3)=3;A(2,1)=4,A(2,2)=5,A(2,3)=6;A(3,1)=7,A(3,2)=8, A(3,3)=9;第二个多重循环是输出二维数组A(3,3)的部分值,即输出A(1,2)、A(2,2)、A(1,3)、A(2,3)四个数据。故A(1,2)、A(2,2)、A(1,3)、A(2,3)的值分别为2,5,3,6。故选择A选项。
转载请注明原文地址:https://jikaoti.com/ti/ISJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
不能脱离控件(包括窗体)而独立存在的过程是()。
要对文本框中已有的内容进行编辑,按下键盘上的按键,就是不起作用,原因是设置了______的属性为True。
在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下:SubCommand1_Click()DimstudentAsstudtypeDimrecord_noAsIntegerrecord_no=1
单击命令按钮时,下列程序的执行结果为PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=12:y=32CallPCS(x,y)Printx;yEndSub
在计算机软件系统的体系结构中,数据库管理系统位于用户和【】之间。
关闭当前的工程并退出VisualBasic的快捷键是
执行以下程序段后,变量c$的值为()。S$="VisualBasicProgramming"b$="Quick"c$=b$&UCase(Mid$(a$,7,6))&Right$(a$,12)
设有关系R和S,关系代数表达式为R-(R-S)表示的是
程序的3种基本控制结构是______。
数据库DB、数据库系统DBS、数据库管理系统DBMS之间的关系是()。
随机试题
切削运动中,速度较高,消耗切削功率较大的运动是主运动。()
Partnering模式发源于()。
在我国,证券投资基金的发行方式主要有()。
根据公司法律制度的规定,公司章程对特定的人员或机构具有约束力。下列各项中,属于该特定人员或机构的有()。(2010年)
企业物流战略应追求的主要目标不包括()。
为宣传变法维新,康有为在广州主持
Itisacommonplaceamongmoraliststhatyoucannotgethappinessbypursuingit.Thisisonlytrueifyoupursueit【C1】______.
WherewasChristinagoingwhenJohnsonmether?
Agoodtranslatorisbydefinitionbilingual.Theoppositeisnot(1)true,however.Abornandbredbilingualwillstillneedt
Schoolsthroughouttheworldareexperiencingaperiodofrapidchangeand,inmanycases,arefindingthatextremely【M1】______
最新回复
(
0
)