首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画1个命令按钮,并编写如下事件过程: Private Sub Command1_Click() Dim a(3,3) For m=1 To 3 For n=1 To 3 If n=m Or n=4-m Then
在窗体上画1个命令按钮,并编写如下事件过程: Private Sub Command1_Click() Dim a(3,3) For m=1 To 3 For n=1 To 3 If n=m Or n=4-m Then
admin
2020-02-27
30
问题
在窗体上画1个命令按钮,并编写如下事件过程:
Private Sub Command1_Click()
Dim a(3,3)
For m=1 To 3
For n=1 To 3
If n=m Or n=4-m Then
a(m,n)=m+n
Else
a(m,n)=0
End If
Print a(m,n);
Next n
Print
Next m
End Sub
运行程序,单击命令按钮,窗体上显示的内容为( )。
选项
A、2 0 0 0 4 0 0 0 6
B、2 0 4 0 4 0 4 0 6
C、2 3 0 3 4 0 0 0 6
D、2 0 0 0 4 5 0 5 6
答案
B
解析
根据For循环中的If语句的条件n=m or n=4-m中的n=m首先可以得出a(1,1)=2,a(2,2)=4,a(3,3)=6,其次根据n=4-m的条件可以得出a(1,3)=4,a(2,2)=4,a(3,1)=4。而其他的元素值都为0。因此窗体上输出的三行分别是:2 0 4 ,0 4 0,4 0 6。
转载请注明原文地址:https://kaotiyun.com/show/AjTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
程序运行时,拖动滚动条上的滚动框,则所触发的事件是()。
设在当前目录下有一个名为“file.txt”的文本文件,其中有若干行文本。编写如下程序:PrivateSubCommand1_Click()Dimch$,asciiAsIntegerOpen"file.txt"ForInputAs#
(1)在名称为Form1的窗体上添加一个名称为Label1的标签,标签的宽和高分别为2000、300,有边框,并利用属性窗口设置适当的属性,使其标题“等级考试”居中显示,并使标签的外观如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名保存为
(1)在名称为Form1的窗体上添加一个名称为Command1的命令按钮,标题为“打开文件”,再添加一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码:①设置适当属性,使对话框的标题为
考生文件夹下有一个工程文件sjt5.vbp。运行程序后,从文件中读出数据,将其放入一个5×5的二维数组a中。请编写程序,找出数组a中每行的最大值及该值在行中的次序(列下标),并将所找到的结果分别保存到一维数组b、c中(a中第一行的最大值保存在b(1)中,最
(1)在考生文件夹下有一个工程文件sjt3.vbp(相应的窗体文件名为sjt3.frm),在窗体上添加一个名称为Listl的列表框和一个名称为Textl的文本框,如图1所示。编写窗体的MouseDown事件过程。程序运行后,如果用鼠标单击窗体,则从键盘上输
某系统总体结构图如下图所示:该系统总体结构图的深度是( )。
设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为
一棵二叉树共有25个结点,其中5个是叶子结点,则度为1的结点数为( )。
为了判断字符串变量strName中的姓名是否姓"李",应采用的表达式是
随机试题
刑罚功能
对于本案中甲用木棒打死乙的行为,以下说法正确的是:对于甲抢走摩托车并伤害中年妇女的行为,如何定性?
定价申报不承担成交义务,申报指令可以撤销。()
信贷客户财务状况变化的风险预警信号包括()。
劳动关系法包括()
4,6,10,14,22,26,34,()
AmyJohnsonwasapioneerairwomaninBritain.ShewasbornonJuly1,1903,inYorkshireandlivedthereuntil1923whenshewe
(2013年南京航空航天大学)试述货币时间价值的概念和它的作用。
进入新时代,我们党面临的执政环境是复杂的,影响党的先进性、弱化党的纯洁性的因素也是复杂的,党内存在的思想不纯、组织不纯、作风不纯等突出问题尚未得到根本解决。党面临的危险有()
HostilitytoGypsieshasexistedalmostfromthetimetheyfirstappearedinEuropeinthe14thcentury.TheoriginsoftheGyps
最新回复
(
0
)