首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
编写如下程序: 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
admin
2016-06-23
41
问题
编写如下程序:
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
4 5 6
B、2 4 6
3 6 9
4 8 12
C、3 5 7
5 8 11
7 11 15
D、4 6 8
7 10 13
10 14 18
答案
B
解析
第一个For循环对数组a和数组b的元素赋初值。第二个For循环实现答应。嵌套循环先执行内循环,条件不满足时退出执行外循环。直到外循环也不满足条件时结束。选B。
转载请注明原文地址:https://jikaoti.com/ti/YCJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列选项中不符合良好程序设计风格的是
向顺序文件Temp.txt中写入1,2,3这3个数。在程序中加入以下语句的哪一项可以使程序功能完整。PrivateSubCommand1_Click() Open"c:\Temp.txt",OutputAs#1 For
在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程:PrivateSubTxtA_KeyPress(Keyasciiasinteger) ……EndSub若焦点位于文本框中,则能够触发KeyPress事
下列程序段的执行结果为DimA(3,3)ForM=1To3 ForN=1To3 IfN=MOrN=3-M+1Then A(M,N)=1 Else A(M,N)=
下列事件过程运行后输出结果是PrivateSubCommand1_Click() PrintFormats(123,456,"###,##%")EndSub
下列程序的功能是:当x<50时,y=0.8×x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。请填空。PrivateSubCommand1_Click()DimxAsSingle x=InputBox("
窗体上建立了一个名为CormnonDialong1的通用对话框,用下面的语句建立一个对话框:CommonDialong1.action=2则以下语句与之等价的是()。
随机试题
在教育目的的探讨上,杜威提倡“_______”。
A.给居民提供盐勺、油壶B.帮助戒烟者实施戒烟计划C.人与环境和谐一致D.相信自己有能力成功E.采纳健康生活方式属于群体行为干预方法的是
中医学认为妊娠剧吐的主要发病机制是
资料1资料2资料3资料4请根据以上资料,选择以下栏目的正确选项:“运输方式”栏:()。
经济学中的理性人假定,也称经济人假定,具体包括()。
所谓“经验”,并非人们从现实经历中获得的认知碎片,而是人们在层层叠叠的认知碎片中______下来的生活整体性体验。“整体性体验”的实质是一种______体验,比如新生与死亡、繁荣与衰落、强大与软弱等。填入划横线部分最恰当的一项是:
阅读给定资料,针对农村留守老人面临的困境提出对策。要求:观点明确,条理清楚,语言流畅,对策可行。字数不超过200字。材料11.农村留守老人是随着我国城镇化进程逐步加快而产生的一批群体,这部分群体,因家中子女进入城镇经商、务工,晚年养老
下列情形采取吸收原则处理数罪并罚根据的是()。
WayneBenoWayneBenowasatrueoutdoorsman.Fishing,boating,hunting,walkingthroughthewoodswithhisthreedogs,Way
YouwillhearaspeechbyIvoJupa,whomadeuseofshortmessageservicetoraisemoneyforcharity.Asyoulisten,answerthe
最新回复
(
0
)