首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画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 The
在窗体上画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 The
admin
2016-08-24
49
问题
在窗体上画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/BiLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在以下程序中,变量S为()。DefDblA-HO-ZDefIntI-NS=1ForI=1To20 S=S*INextIPrintf"S=",S
下面程序是由鼠标事件在窗体上画图,如果按下鼠标将可以画图,双击窗体可以清除所画图形。补充完整下而的程序。首先在窗体层定义如下变量:DimPaintStartAsBoolean编写如下事件过程:PrivateSubF
以下各项中,VisualBasic不能接收的图形文件是
数据独立性分为逻辑独立性与物理独立性。当数据的存储结构改变时,其逻辑结构可以不变,因此,基于逻辑结构的应用程序不必修改,称为______。
下列各种形式的循环中,输出“*”的个数最少的循环是()。
下列程序的功能是:将数据1,2,…,8写入顺序文件Num.txt中,请补充完整。PrivateSubForm_Click()DimiAsInteger Open"Num.txt"ForOutputAs#1
下面的程序代码实现将一个一维数组中元素向右循环移动,移位次数由文本框Text输入。例如数组各元素的值依次为0,1,2,3,4,5,6,7,8,9,10;移动三次后,各元素的值依次为8,9,10,0,1,2,3,4,5,6,7。PrivateSub
下列叙述中正确的是()。
如下图所示,在名为Form1的窗体上建立一个名称为Text1的文本框,然后建立两个主菜单,标题分别为“名单”和“帮助”,名称分别为VbMenu和vbHelp,其中“名单”菜单包括“张平”、“李杰”和“王海”,3个菜单项,名称分别为vbMenu1、vbMen
本程序的功能是利用随机数函数模拟投币,方法是:每次随机产生一个整数0或1,相当于一次投币,1代表正面,0代表反面。在窗体上有3个文本框,名称分别是Textl、Text2、Text3,分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数,如图1所示
随机试题
水轮发电机转子回路发生一点接地时,允许继续运行2h。()
良性小动脉性肾硬化症,延缓肾损害进展的关键是
热甚动风的先兆可见
一位亚急性细菌性心内膜炎患者,下床活动后出现意识逐渐模糊至昏迷,并有右侧偏瘫,其最可能的原因是
正确的公式是()。
销售产品一批,部分货款对方存入本企业银行账户,部分货款对方暂欠时,应填制的记账凭证是()。
下列选项中,不属于金融市场客体的是()。
2016年10月1日,甲公司按照面值发行债券10000000元,并用来建造厂房,债券期限为3年,到期一次还本付息,票面利率与实际利率均为6%。厂房建造于2016年年初开工,2016年12月31日尚未完工,应编制的会计分录为()。
接管由银保监会决定,并组织实施。银保监会的接管决定应当载明的内容有()。
Manyteachersbelievethattheresponsibilitiesforlearningliewiththestudent.【C1】______alongreadingassignmentisgiven,
最新回复
(
0
)