首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,并有如下程序代码: Option Base 1 Private Sub Command1_Click() Dim a%(3, 3) For i = 1 To 3 For j =
窗体上有一个名称为Command1的命令按钮,并有如下程序代码: Option Base 1 Private Sub Command1_Click() Dim a%(3, 3) For i = 1 To 3 For j =
admin
2020-02-27
58
问题
窗体上有一个名称为Command1的命令按钮,并有如下程序代码:
Option Base 1
Private Sub Command1_Click()
Dim a%(3, 3)
For i = 1 To 3
For j = 1 To 3
If i > 1 And j > 1 Then
a(i, j) = a(a(i - 1, j - 1), a(i, j - 1)) + 1
Else
a(i, j) = i * j
End If
Next
Next
Print a(2, 2); a(3, 3)
End Sub
运行程序,单击命令按钮,窗体上显示的是
选项
A、1 3
B、2 1
C、2 2
D、3 3
答案
D
解析
a是个整形的二维数组。通过For循环给数组a元素赋值。i > 1 并且 j > 1时执行a(i, j) = a(a(i - 1, j - 1), a(i, j - 1)) + 1语句,否则执行a(i, j) = i * j,因此执行完第一个大循环后,数组a中的元素值分别是:a(1,1)= 1,a(1,2)= 2,a(1,3)= 3。以此类推,可知a(2,2)=3,a(3,3)=3。选D)。
转载请注明原文地址:https://kaotiyun.com/show/MPTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个Text1文本框,并编写了下面事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger) KeyAscii=KeyAscii+3EndSub程序运行时,在文本框中输入字符"A",则在文本
一个栈的初始状态为空。现将元素1,2,3,A,B,C依次入栈,然后再依次出栈,则元素出栈的顺序是
下面关于直线控件的叙述中正确的是
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可将考生文件夹下in3.txt文件中的所有英文单词读入,并在Text1文本框中显示;单击“插入列表框”按钮,则按顺序将每个单词作为一项添加到List1列表框中(如图所示)
在黑盒测试方法中,设计测试用例的主要根据是()。
设窗体上有1个名称为HScroll1的水平滚动条,其Max、Min属性分别设置为100、1;有2个名称分别为Option1、Option2的单选按钮,其标题分别为"30"、"50";还有下面程序代码:PrivateSubOption1_Cli
(1)在考生目录下有一个工程文件sjt3.vbp,窗体文件中已给出所有控件和部分程序,如图3.119所示。要求:①利用属性窗口设置适当的属性,使Text1、Text2中数据右对齐;②请编写适当的程序完成以下功能:在Text1中输入40(
以下关于菜单的叙述中,错误的是()。
在软件开发中,需求分析阶段可以使用的工具是()。
随机试题
A.麻黄素B.普鲁卡因C.利多卡因D.肾上腺素E.丁卡因加入局麻药注射液中,可以延缓局麻药的吸收,减少吸收中毒的可能性,同时又可延长局麻药作用时间的是
A.吸血昆虫B.空气、飞沫C.饲料、水D.鼠E.伤口牛流行热的主要传播媒介是
城镇土地使用税的特点包括()。
依据《工伤保险条例》规定,享有工伤保险权利的主体是()
H股的发行方式是“公开发行”加“国际配售”。( )
根据营业税法律制度的规定,下列应税行为中,不属于增值税征收范围的是()。
新闻出版署批准设立互联网出版机构的申请后,申请者应该()。
假设检验是解决问题的首要环节。()
结合材料回答问题材料1“从许多方面来说,现在我们还是把毛泽东同志已经提出、但是没有做的事情做起来,把他反对错了的改正过来,把他没有做好的事情做好。今后相当长的时期,还是做这件事。当然,我们也有发展,而且还要继续发展。”这是邓小平1980年10月25日同
FarewellSpeech1."Specialneeds"Commonlydefinedbywhatachildcan’tdoBymilestonesunmetBy【T1】______【T1】______Byexper
最新回复
(
0
)