首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim a(3,3) As Integer Dim b(3,3) As Integer For i=1 To 3 For j =1 To 3 a(i,
编写如下程序: Private Sub Command1_Click() Dim a(3,3) As Integer Dim b(3,3) As Integer For i=1 To 3 For j =1 To 3 a(i,
admin
2019-06-20
49
问题
编写如下程序:
Private Sub Command1_Click()
Dim a(3,3) As Integer
Dim b(3,3) As Integer
For i=1 To 3
For j =1 To 3
a(i,j)=i+j
b(i,j)=a(i,j)+i*(j-1)
Next j
Next i
For i=1 To 3
For j=1 To 3
Print b(i,j);
Next j
Print
Next i
End Sub
程序运行后,单击命令按钮Command1,输出结果为( )。
选项
A、2 3 4
3 4 5
3 6 9
B、2 4 6
4 5 6
4 8 12
C、3 5 7
5 8 11
7 10 13
D、4 6 8
7 11 15
10 14 18
答案
B
解析
第一个For循环对数组a和数组b的元素赋初值。第二个For循环实现打印。嵌套循环先执行内循环,条件不满足时退出执行外循环。直到外循环也不满足条件时结束。选B。
转载请注明原文地址:https://kaotiyun.com/show/7MUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
由高中数学可知,对于连续函数f(x),若f(x1)与f(x2)值的符号相反,则在x1和x2之间必存在x0,使得f(x0)=0(该点称为“零点”)。设有VB函数:PrivateFunctionf(xAsSingle)AsSingle可以返回f(x)
通用对话框Filter属性的作用是
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、11blTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txt
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上添加一个计时器控件,名称为Timerl。请利用属性窗口设置适当属性,使得在运行时可以每隔1秒,调用计时器的Timer。事件过程一次。另外
(1)在考生目录下有一个工程文件sit3.vbp,窗体上由一个单选按钮数组,含三个单选按钮,均没有标题,请利用属性窗口,为单选按钮依次添加标题为“北京”、“上海”、“广州”;再添加一个标题为“显示”的命令按钮,如图2—18所示。程序的功能是在运行时,如
在考生文件夹下的“samp1.accdb”数据库文件中已建立表对象“tStud”和“tScore”、宏对象“mTest”和窗体“fTest”。请按以下要求,完成各种操作。(1)分析并没置表“tScore”的主键。(2)将学生“入校时间”
设在窗体上有一个名称为Check1的复选框数组,并有以下事件过程:PrivateSubCheck1_Click(IndexAsInteger)…EndSub则下面叙述中错误的是
下面可以产生20~30(含20和30)的随机整数的表达式是
下列运算符中,优先级别最低的是()。
下列运算符中,优先级别最高的是
随机试题
完成相互依存的任务,实现共同使命的一群人是指()
案例:故事发生的两个企业:企业A,某知名企业,现已没落,名字隐去。企业B,某知名企业,历久不衰,名字隐去。故事发生的背景:两企业都有一个工作规定,上午工作到12点,公司分发午饭,吃饭后到13点30分上班,期间可以在休息室休息,也可以去体育
“-3/2自疏法则”描述了植物种群内个体间由于竞争而产生的
保险通知书是保险人承保被保险人在一定时期内分批发运的货物所开列的保险单。()
下例资料中,属于建设项目竣工验收的工程技术资料验收内容的是()。
猛安谋克
犯罪的一般客体是对同类客体的抽象和概括。()
TheoutbreakofswinefluthatwasfirstdetectedinMexicowasdeclaredaglobalepidemiconJune11,2009.Itwasthefirstwo
Ascomputersandconnectivitybecomecheaper,itmakessensetobakethechipsintomoreandmorethingsthatarenot,inthemse
CONSULTING
最新回复
(
0
)