首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,并有如下程序代码: Option Base1 Private Sub Command1_Click() Dim a%(3,3) For i=l To 3 For i=l
窗体上有一个名称为Command1的命令按钮,并有如下程序代码: Option Base1 Private Sub Command1_Click() Dim a%(3,3) For i=l To 3 For i=l
admin
2020-04-18
57
问题
窗体上有一个名称为Command1的命令按钮,并有如下程序代码:
Option Base1
Private Sub Command1_Click()
Dim a%(3,3)
For i=l To 3
For i=l To 3
Ifi>1 And{>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/qdTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设子程序过程定义的首部为:PublicSubs(xAsInteger,YAsSingle)则以下正确的调用形式为
设某二叉树的前序序列与中序序列均为ABCDEFGH,则该二叉树的后序序列为
设窗体文件中有下面的事件过程:PrivateSubCommandl_Click()Dims:a%=100:PrintaEndSub其中变量a和s的数据类型分别是
设窗体上有1个名称为HScroll1的水平滚动条,其Max、Min属性分别设置为100、1:有2个名称分别为Option1、Option2的单选按钮,其标题分别为“30”、“50”;还有下面程序代码:PrivateSubOptionl_Cli
VisualBasic源程序的续行符为
以下关于VB对象属性的叙述中,错误的是
以下能对正实数d的第3位小数四舍五入的表达式是()。
窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger)PrintText1.Text;EndSub运行程
VB中,若没有显式声明变量的数据类型,则默认的类型是
考生文件夹下有工程文件sjt5.vbp和数据文件in5.txt。in5.txt中有多条记录,每条记录占一行,含4个数据项,数据项的含义依次是:姓名、数学成绩、语文成绩、英语成绩。窗体上按钮“读取数据”的功能是把in5.txt中的所有记录读到数组a
随机试题
当分析不同浓度水平的质控品时,可制作单个质控图来显示所有质控测定值的“Z-分数”。如果平均值为5.2,标准差为0.4的控制物的测定值为5.6,则Z-分数为
A.直接作用受体B.影响递质的储存C.影响递质的代谢D.影响递质的释放E.影响递质的生物合成毛果芸香碱的作用是
【2003年第28题】确定图3—263中所示结构的超静定次数:
不属于《安全生产法》调整范围的是()。
罗森塔尔关于教师的预期的实验表明().
某大湖是重要的候鸟越冬场所。近年来,该湖出现枯水期提前、枯水期持续时间延长等问题,枯水期水位过低,鱼类减少,影响了越冬的鸟类进食。有专家建议,应该在湖的入江水道处修建水闸,通过控制枯水期水位,增加湖区鱼类的生活空间,保护越冬的候鸟。以下哪项如果为真,将最有
下列各组中全是偏正型的是()。
设有以下命题:①若正项级数μn收敛,则μn2收敛;②若<1,则μn收敛;③若(μ2n-1,μ2n)收敛,则μn收敛;④若μn收敛,(-1)nμn发散,则μ2n发散.则以上命题正确的是().
IappreciateyouverymuchfordroppingbyourboothattheExhibitionlastmonth.Asyoumighthave(141)noticed,ourcompany
•Readthearticlebelowaboutpeoplewhobuyclothesasaninvestment.•Foreachquestion(31-40),writeonewordinCAPITALL
最新回复
(
0
)