首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画1个命令按钮,并编写如下事件过程: Private Sub Commandl_Click() Dim a(3,3) For m=1 To 3 For n=1 To 3 If n=m Or n=4-mThen a
在窗体上画1个命令按钮,并编写如下事件过程: Private Sub Commandl_Click() Dim a(3,3) For m=1 To 3 For n=1 To 3 If n=m Or n=4-mThen a
admin
2017-06-21
14
问题
在窗体上画1个命令按钮,并编写如下事件过程:
Private Sub Commandl_Click()
Dim a(3,3)
For m=1 To 3
For n=1 To 3
If n=m Or n=4-mThen
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循环为二维数组a的各元素赋值,该二维数组对应矩阵的主对角线上的元素(即满足条件m=n)和副对角线上的元素(即满足条件m+n=4)其值为m+n,即主对角线上的元素从左上至右下依次为2、4、6,副对角线上的元素均为4,而其它元素均为0。
转载请注明原文地址:https://jikaoti.com/ti/5iy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在长度为n的有序线性表中进行二分查找。最坏的情况下,需要的比较次数为上______。
在窗体上有—今名为Cd1的通用对话框,为了在运行程序时打开保存文件对话框,则在程序中应使用的语句是______。
在窗体上面一个名称为TxtA的文本框,然后编写如下的事件过程:PrivateSubTxtA_KeyPress(KeyAsciiasInteger)…EndSub若焦点位于文本框中,则能够触发KeyPress事件的操
在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimxAsInteger,nAsInteger
在窗体上画一个名称为Listl的列表框,一个名称为Labell的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。
关系模型允许定义3类数据约束,它们是【】约束、参照完整性约束以及用户定义的完整性约束。
在数据库管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是
在C盘当前文件夹下建立一个名为SDat.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。则在下列横线处合适的语句是()。PrivateSubForm_Cli
若关系R所有的属性都是不可再分的数据项,则称R属于______。
排序是计算机程序设计中的一种重要操作,常见的拌序方法有插入排序、______和选择排序。
随机试题
差错控制编码一般可以分为检错码和__________。
简述计划的基本特点。
把下面几个句子组成语意连贯的一段话,排序正确的一组是()。①战后的世界并不是一个和谐、安宁的世界。②不公正、不合理的国际政治经济秩序没有得到改变,发展中国家仍有亿万人民处于贫困状态。③领土、民族、宗教、资源等因素引发的武装冲突和局部战争连
根据下列材料回答问题。各类科技项目的数目在广东省所占比例都是珠三角地区中最低的城市是()。
明式家具盛行的时代为()。
赵元的同事都是球迷,赵元在软件园工作的同学都不是球迷,李雅既是赵元的同学又是他的同事,王伟是赵元的同学但不在软件园工作,张明是赵元的同学但不是球迷。根据以上陈述,可以得出以下哪项?
以总分的降序排列当前表格。
设x是小于10的非负数。对此陈述,以下正确的VB表达式是
使用VC6打开考生文件夹下的源程序文件modi.cpp,该程序运行时有错误,请改正其中的错误,使得程序正确运行。程序输出:s1:n=20s2:n=10执行s3.add(s1,s2)s3:n=30s
HintsandTipstoSaveMoneyA)Spendless.Thisisnotoversimplifyingthebestwaytosavemoney!Itisessentialifyouar
最新回复
(
0
)