首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮Command1,然后编写如下程序: Private Sub Command1_Click() Dim arr()As Integer ReDim arr(3) For i=0 To 3 al
在窗体上画一个命令按钮Command1,然后编写如下程序: Private Sub Command1_Click() Dim arr()As Integer ReDim arr(3) For i=0 To 3 al
admin
2013-04-11
57
问题
在窗体上画一个命令按钮Command1,然后编写如下程序:
Private Sub Command1_Click()
Dim arr()As Integer
ReDim arr(3)
For i=0 To 3
alt(i)=i
Next i
x=InputBox("请输入一个数字:")
If Val(x)>4 Then
Re Dim arr(4)
arr(4)=x
End If
Me.Print(arr(4)-arr(3))
End Sub
程序运行后,单击命令按钮,在输入对话框中输入12,输出结果为【 】。
选项
答案
12
解析
用Redim语句重定义数组的维数时,原有维数内的内容将被破坏。除非用Redim Preserve来重新定义维数。本题中由于输入值x>4,动态数组在被重定义为包含4个元素的数组后(即Redim arry(3),此时arry(3)=3),重新被定义为包含5个元素的数组,而重定义时并未用Preserve关键字。故此时arry(3)=0(实际上arry(0)、 arry(1)、arry(2)的值也都为0,即Integer类型变量的初始值)。
转载请注明原文地址:https://kaotiyun.com/show/cdhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序:FunctionFunc(ByValxAsInteger,yAsInteger)y=x*yIfy>0Then
使用驱动器列表框的______属性可以返回或设置驱动器列表中当前选中的磁盘驱动器的索引值。
数据结构中,与所使用的计算机无关的是数据的______。
在窗体上画一个名称为List1的列表框,一个名称为Labell的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。
执行如下程序段后,intsum的值为【】。PrivateSubCommand1_Click()sum=0Fori=1To18Step2Forj=2To6
阅读下面的程序段,执行上面的三重循环后,a的值为______。Fori=1To3Forj=1ToiFork=jTo4a=a+1NextkNe
当运行程序时,系统会自动执行启动窗体的某个事件过程,该事件过程是______。
结构化程序设计的主要特点是______。
下列叙述中正确的是______。
已知二叉树后序遍历序列是dabec,中序遍历序列是debac,它的前序遍历序列是
随机试题
人民法院审理行政案件,认为地方人民政府制定、发布的规章与国务院部、委制定、发布的规章不一致的,应()。
ZXG一300是____的型号。
已知学生表:S(学号,姓名,性别,出生年月)和SQL语句:SELECT学号,姓名,性别FROMSWHERE性别="男"ORDERBY学号;试依据这个SQL语句的功能,按照下图中的标号在右侧横线上填写相关
用成本法评估土地使用权通常适用于()
火力发电厂启动/备用变压器采用有载调压变压器时,关于其分接开关调压范围和级电压的选择,下述说法正确的是()。
建设工程项目总进度目标的控制是( )项目管理的任务。
有关承兑的以下说法中,哪些是正确的?()
下列哪些是根据法律的规范作用的主体范围和方法的不同,对法律规范作用进行的划分?()
IfyouthinkJapan’shard-drinkingbusinesscultureisasdeadastheSonyBetamax,thinkagain.【C1】______Notonlyarecompany-
Isscienceinfinite?Canitkeepgivingusprofoundinsightsintotheworldforever?Orisitalreadybumpingintolimits?Inhi
最新回复
(
0
)