首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Commandl、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Command l Click()
窗体上有Commandl、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Command l Click()
admin
2020-01-02
23
问题
窗体上有Commandl、Command2两个命令按钮。现编写以下程序:
Option Base 0
Dim a()As Integer,m As Integer
Private Sub Command l Click()
m=InputBox(”请输入一个正整数”1)
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、11
答案
B
解析
本题考查的考点是有关动态数组的。动态数组以变量作为下标值,在程序运行过程中完成定义,通常分为两步:首先在窗体层、标准模块或过程中用Dim或Public声明一个没有下标的数组(括号不能省略),然后在过程中随时用ReDim语句可以重定义变量作为下标的数组,重定义后原数组的所有元素值被清空。本题中由于数组下标从0开始,所以单击Commandl后输入10,数组被重定义成了11个元素:然后单击Command2输入5,数组又被重定义成了6个元素,所以最后数组中有6个元素。
转载请注明原文地址:https://kaotiyun.com/show/11Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有1个Timer1计时器,1个Shapel形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubForm_Load()flag=TrueTimer1.Enabled=TrueTime
以下关于控件数组的叙述中,正确的是
有下面程序代码:OptionBase1PrivateSubCommandl_Click()Dima(10)AsInteger,x,bx=InputBox(”请输入一个多位整数”)Fork=1
假设有如下的命令按钮(名称为Command1)事件过程:PrivateSubCommand1_Click()x=InputBox(”输入:”,”输入整数”)MsgBox”输入的数据是:”,”输入数据:”+xEndSu
窗体上有名称为Commandl的命令按钮,名称分别为List1、List2的列表框,其中List1的MultiSelect属性设置为1(Simple),并有如下事件过程:PrivateSubCommandl_Click()Fori
窗体上有1个名称为Label1的标签;1个名称为List1,且含有若干表项的列表框。为了使得单击List1中某个表项时,在Label1中相应地显示该表项,应使用的程序代码为
在程序运行时,下面的叙述中正确的是
随机试题
戴望舒曾因发表了著名的诗作《雨巷》而被称为_____诗人。
在Windows中,利用应用程序窗口标题栏左边的控制菜单,不能完成的操作是()
对体弱的老年慢性阻塞性肺气肿患者的治疗中,不恰当的是
某钻孔灌注桩单桩基础,桩径1.2m,桩长16m,土层条件如图4.3—11所示,地下水位在桩顶平面处。若桩顶平面处作用大面积堆载p=50kPa,根据《建筑桩基技术规范》JGJ94—2008,桩侧负摩阻力引起的下拉荷载Qgn(kN)最接近下列何项数值?(忽略
城镇体系的()是对区域城镇空间网络组织的规划研究。
为了方便消防验收顺利进行,有利于对消防工程施工实施全过程监督检查,某些消防安全重点工程可以按施工程序划分为()等消防验收形式。
在行业的市场结构分析中,相对少量的生产者在某种产品的生产中占据很大市场份额的情形是指()。
在各类金融工具中,短期融资券属于()。
材料一:2015年3月5日,习近平同志在参加十二届全国人大二次会议上海代表团审议时强调,加强与创新社会治理,关键在体制创新,核心是人,只有人与人和谐相处,社会才会安定有序,社会治理的重心必须落到城乡社区,社区服务和管理能力强了,社区治理的基础就实了。
在虚拟段式存储管理中,若逻辑地址的段内地址大于段表中该段的段长,则发生上【】。
最新回复
(
0
)