首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,并有如下程序代码: OptionBase 1 Private Sub Command1 Click() Dim a%(3,3) For i=1 To 3 Forj=1 To 3 Ifi>1 Andj>1 The
窗体上有一个名称为Commandl的命令按钮,并有如下程序代码: OptionBase 1 Private Sub Command1 Click() Dim a%(3,3) For i=1 To 3 Forj=1 To 3 Ifi>1 Andj>1 The
admin
2019-07-30
72
问题
窗体上有一个名称为Commandl的命令按钮,并有如下程序代码:
OptionBase 1
Private Sub Command1 Click()
Dim a%(3,3)
For i=1 To 3
Forj=1 To 3
Ifi>1 Andj>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(1,1)=1,a(1,2)2,a(1,3)=3,a(2,1)=2,a(3,1)=3;然后按照公式计算其余的元素。
转载请注明原文地址:https://kaotiyun.com/show/t4Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序在运行时输出的结果是()。OptionBase1PrivateSubForm_Click()Dimx(10)Fori=1To10x(i)=10-i+1Nexti
设有如下通用过程:PublicSubFun(a()AsInteger,xAsInteger)Fori=1To4x=x*a(i)NextEndSub在窗体上画一个名称为Text1
下面程序运行时,若输入395,则输出结果是()。PrivateSubCmdl_Click()Dima%a=InputBox("请输入一个3位整数")PrintaMod10,a\100,(aMod
在窗体上画一个名为Command1的命令按钮,编写如下程序:PrivateSubCommand1_Click()DimM(10)AsIntegerFork=1To10M(k)=12-kNext
下列程序运行后,输出结果为()。Subabcd(ByValnAsInteger)n=n+5EndSubPrivateSubFormClick()n%=3Callabcd(n
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序:PrivateSubfune(LAsLabel)PrivateSubCommandl_Click()L.C
以下合法的VisualBasic标识符是
设a=“MicrosoftVisualbasic”,则以下使变量b的值为“Visualbasic”的语句是
以下打开VisualBasic编辑器的操作中,错误的是
随机试题
临床上,经过治疗也不能保存的第一恒磨牙最佳拔除时间范围宜在
A、黄芩苷B、黄芩素C、槲皮素D、槲皮素-7-O-葡萄糖苷E、矢车菊素不易溶于水易溶于NaHCO3的苷是
关于信用证支付,下列说法错误的是?()
下列说法错误的是()。
在素质测评中,常用的对员工进行分类的标准有()。
在培养学生问题解决能力时,教师做法错误的是()。
很多孩子只能听赞美之词,听不得半点反对意见;有的孩子外表高傲,内心脆弱,敏感多疑。他们遇到一些不顺心的事情,就会有极端的举动,这就是所谓的“蛋壳心理”。过分骄纵、百般溺爱是导致这种心理的最直接原因。建议父母在孩子顺心的成长道路上制造一点挫折,让孩子学会在逆
由清末民初实利主义、实用主义教育思想发展而来,适应中国民族资本主义发展的需要,提出教育要授人以一技之长和促进实业发展的教育思潮是()。
CorporateReceptionistWantedAbouttheJobHTStaffingisseekingaCorporateReceptionistintheWestLakeHillsarea.We
OneofAmerica’smostimportant【B1】______ishermodernmusic.Americanpopularmusicisplayedallovertheworld.Itisenjoye
最新回复
(
0
)