首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Command1、Command2两个命令按钮。现编写以下程序:Option Base 0 Dim a() As Integer,m As Integer Private Sub Command1_Click()m=InputBox("请输入一个正
窗体上有Command1、Command2两个命令按钮。现编写以下程序:Option Base 0 Dim a() As Integer,m As Integer Private Sub Command1_Click()m=InputBox("请输入一个正
admin
2019-03-08
53
问题
窗体上有Command1、Command2两个命令按钮。现编写以下程序:Option Base 0 Dim a() As Integer,m As Integer Private Sub Command1_Click()m=InputBox("请输入一个正整数")ReDim a(m) End Sub Private Sub Command2_Click()m=InputBox("请输入一个正整数")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/XlFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有名称为Command1的命令按钮,其事件过程如下:OptionBase1PrivateSubCommand1_Click()DimaDimb(10)AsIntegera=Array(2,4,
决定对象拖放模式的属性是()。
下列关于菜单的描述中错误的是()。
下面说法中错误的是
逻辑模型是面向数据库系统的模型,下面属于逻辑模型的是
当复选框控件被选中(即复选框控件内显示"√"标记)时,其Value属性的值为()
在运行时,如果按Tab键跳过了一个可以获得焦点的控件(如文本框),其原因可能是()。
下面对软件测试描述错误的是
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及两条水平直线,名称分别为Line1和Line2。请用名称为Shape1的形状控件,在两条直线之间画一个宽和高都相等的形状,设置其形状为圆,并设置适当属性使
随机试题
在工程双代号网络计划中,某项工作的最早完成时间是指其()。
《越绝书》
A.B内酰胺类B.氨基糖苷类C.大环内酯类D.喹诺酮类E.四环素类硫酸庆大霉素为
在条件允许的情况下,可利用()开展环境风险评价。
建设单位根据有关规定要求办理了工程质量监督申报手续。根据工程质量监督的相关规定,工程质量监督机构应该在开工前召开工程建设各方代表参加的监督会议,同时()。
公安机关羁押工作的对象包括()。
多发性硬化是一种无法治愈的退行性疾病,患者的免疫系统会__________神经细胞的保护层,阻断大脑和身体的__________,从而导致一系列可怕的症状:肌肉颤抖,失明,大小便失禁,最终甚至导致早逝。然而在2009年,意大利研究者保罗·赞邦尼博士宣称,他
(96年)设工厂A和工厂B的产品的次品率分别为1%和2%,现从由A厂和B厂的产品分别占60%和40%的一批产品中随机抽取一件,发现是次品,则该次品是A厂生产的概率是_______.
A、AlthoughB、ThereforeC、HoweverD、HenceC本题考核的知识点是连词。分析上下文逻辑关系,是相反的概念,所以是转折连词。A项表示“虽然”,引导的应是转折的前半部分;C项表示“但是”,引导的是转折的后半部分。故选C。然而
Longbusridesareliketelevisionshows.Theyhaveabeginning,amiddle,andanend—withcommercialsthrownineverythreeor
最新回复
(
0
)