首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim Private Sub Command2_Click() a()As Integer,m As Int
窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim Private Sub Command2_Click() a()As Integer,m As Int
admin
2019-07-30
27
问题
窗体上有Command1、Command2两个命令按钮。现编写以下程序:
Option Base 0 Dim Private Sub Command2_Click()
a()As Integer,m As Integer m=InputBox("请输入一个正整数")
Private Sub Command 1_Click() ReDim a(m)
m=InputBox("请输入一个正整数") End Sub
ReDim a(m)
End Sub
运行程序时,单击Command1后输入整数10,再单击Command2后输入整数5,则数组a 中元素的个数是
选项
A、5
B、6
C、10
D、11
答案
B
解析
本题考查的考点是有关动态数组的。动态数组以变量作为下标值,在程序运行过程中完成定义,通常分为两步:首先在窗体层、标准模块或过程中用Dim或Public声明一个没有下标的数组(括号不能省略),然后在过程中随时用ReDim语句可以重定义变量作为下标的数组,重定义后原数组的所有元素值被清空。本题中由于数组下标从0开始,所以单击Command1后输入10,数组被重定义成了11个元素:然后单击Command2输入5,数组又被重定义成了6个元素,所以最后数组中有6个元素。
转载请注明原文地址:https://www.kaotiyun.com/show/hiUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于窗体的叙述中,错误的是
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框,其Text属性值为“VBProgramming”。运行程序后,选中其中的“VB”,并执行如下事件过程:PrivateSubCommand1_Click()T
用来设置文字字体是否斜体的属性是
假定Picturel和Text1分别为图片框和文本框的名称,则下列错误的语句是
以下程序段的输出结果是X=1:Y=4DoUntilY>4X=X*Y:Y=Y+1LoopPrintX
设有如图所示窗体和以下程序:PirintSubCommand1_Click()Text1.Text="VisualBasic"EndSubPrivateSubTextLostFocus()If
若在窗体模块的声明部分声明了如下自定义类型和数组PrivateTyperecCodeAsInteger:CaptionAsStringEndTypeDimart(5)Asrec则下面的输出
若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是
设窗体上有一个Command1命令按钮,还有以下程序代码:PrivateSubCommand1_lick()PrivateSubproc(aAsInteger)StaticxAsInteger
下列哪一条不属于数据库设计的任务?()
随机试题
小叶性肺炎的并发症有
影响微囊囊径大小的因素有
A.急性阴道炎B.宫颈腺体囊肿C.宫颈息肉D.宫颈管炎E.宫颈结核
A.薄荷B.荆芥C.益母草D.广藿香E.细辛气香特异,味微苦的药材是
招标采购项目信息记录中的采购文件包括()。
【背景资料】某城市给水工程的施工总承包商与某管道施工工程公司签订了管道焊接施工分包合同。在施工中,总承包商项目经理部严格执行《质量管理体系基础和术语》(GB/T19000--2008)标准对质量控制的规定。在该工程施工总承包合同签订
下列旋律片段出自哪部作品?()
[2015年第41--42题]基于以下题干:某大学运动会即将召开,经管学院拟组建一支12人的代表队参赛,参赛队员将从该院4个年级的学生中选拔。学校规定:每个年级都须在长跑、短跑、跳高、跳远、铅球等5个项目中选择1~2项参加比赛,其余项目可任意选择
设f(χ)可导,则下列正确的是().
Thereisarangeofactivitieswhichrequiremovementsofaboutonetofourorfivemiles.Thesemightbeleisureactivities,su
最新回复
(
0
)