首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上:有Commandl、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,mAs Integer Private Sub Cortmaandl Click() m=InputBo
窗体上:有Commandl、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,mAs Integer Private Sub Cortmaandl Click() m=InputBo
admin
2019-04-29
27
问题
窗体上:有Commandl、Command2两个命令按钮。现编写以下程序:
Option Base 0 Dim
a()As Integer,mAs Integer
Private Sub Cortmaandl Click()
m=InputBox(”请输入一个正整数”)
ReDim a(m)
End Sub
Private Sub Command2_Click()
m=InputBox(”请输入一个正整数”)
ReDim a(m)
End Sub
运行程序时,单击Commandl后输入整数10,再单击Command2后输入整数5,则数组a 中元素的个数是
选项
A、5
B、6
C、10
D、1 1
答案
B
解析
本题考查的考点是有关动态数组的。动态数组以变量作为下标值,在程序运行过程中完成定义,通常分为两步:首先在窗体层、标准模块或过程中用Dim或Public声明一个没有下标的数组(括号不能省略),然后在过程中随时用ReDim语句可以重定义变量作为下标的数组,重定义后原数组的所有元素值被清空。本题中由于数组下标从0开始,所以单击Commandl后输入10,数组被重定义成了11个元素;然后单击Command2输入5,数组又被重定义成了6个元素,所以最后数组中有6个元素。
转载请注明原文地址:https://jikaoti.com/ti/aON0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画1名为Commandl的命令按钮和1名Textl的文本框,再编写如下程序:Dim’ssAsStringPrivateSubCommandlClick()PrivateSubTextl—_KeyPress(KeyAscii一D
以下能对正实数d的第3位小数四舍五入的表达式是
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:PublicxAsIntegerPdvateyAsInteger窗体文件的程序代码是:DimaAsIntegerPrivateSUbCommandlClick()P
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
当窗体大小改变时,要使其中的控件也按比例发生变化,应使用窗体的()。
以下叙述中正确的是()。
下面4个选项中,不是窗体属性的是()。
关于变量作用域,下列叙述中正确的是()。
以下描述中,不是线性表顺序存储结构特征的是()。
可以产生30~50(含30和50)之间的随机整数的表达式是()。
随机试题
Itisallverywelltoblametrafficjams,thecostofpetrolandthequickpaceofmodemlife,butmannersontheroadsarebec
DDST发育筛选法分布在个人社会、适应性、精细动作、语言、大运动四个领域。()
下列各项中,错误的是()
针对市场需要,尽快开发出新产品,抢占先机,及时满足消费者的需求,这属于下列哪种新产品开发策略?()
A.CTXB.VCRC.MTXD.ADME.L—Asp能引起心脏损伤的是
某证券市场2019~2021年的股票市场价格指数分别为2200、4800和3100,则下列表述正确的有()。
教育史上最早正式使用“班级”一词的教育家是()。
在C++语言中引进了类的概念。类的定义包括类名、类的说明和类的实现。(1)是类的外部接口,(2)是类的内部表示,类具有(3)、(4)和(5)。有了(3)可以隐藏类对象内部实现的复杂细节,有效地保护内部所有数据不受外部破坏;(4)增强了类的共享机制,实现了软
Youwillnowbeaskedaquestionaboutafamiliartopic.Afteryouhearthequestion,youwillhave15secondstoprepareyourr
Learningtoplayamusicalinstrumentcanchangeyourbrain,withaUSreviewfindingmusictrainingcanleadtoimprovedspeech
最新回复
(
0
)