首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Commandl、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Commandl_Click() m=Input
窗体上有Commandl、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Commandl_Click() m=Input
admin
2013-11-29
23
问题
窗体上有Commandl、Command2两个命令按钮。现编写以下程序:
Option Base 0
Dim a()As Integer,m As Integer
Private Sub Commandl_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、11
答案
B
解析
程序中Option Base 0表示指定数组的下标默认下界为0。ReDim语句用来重新定义动态数组,按定义的上下界重新分配存储单元。在一个程序中,可以多次用Re-Dim语句定义同一个数组,随时修改数组中元素的个数。程序中先执行ReDim a(10),然后执行了ReDim a(5),因此数组a的下界为0,上界为5,共有6个元索。
转载请注明原文地址:https://kaotiyun.com/show/UPQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在面向对象的程序设计中,类描述的是具有相似性质的一组【】。
设a=1,b=2,c=3,d=4,表达式Notb=aOr4*a+1>=dAndc<>a+b的值为【】。
假定在窗体上建立一个通用对话框,其名称为CommonDialog1,用下面的语句可以建立一个对话框:CommonDialog1.Action=1与该语句等价的语句是______。
下述关于数据库系统的叙述中正确的是
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger,则以下叙述中正确的是
单击命名按钮时,下列程序代码的执行结果为PublicSubprocl(nAsInteger,ByvalmAsInteger)n=nMod10m=mMod10EndSub
如图所示,在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配项
设已经在“菜单编辑器”中设计了窗体的快捷菜单,其顶级菜单为Bs,取消其“可见”属性,运行时,在以下事件过程中,可以使快捷菜单响应鼠标右键菜单的是
有下列二叉树,对此二叉树前序遍历的结果为()。
下列描述中,不是线性表顺序存储结构特征的是()。
随机试题
把提供的各种信息重新组合,朝着一个方向、寻找出一个正确答案或最佳方案的思维称为_______。
A.自身免疫性溶血性贫血B.遗传性球形细胞增多症C.阵发性睡眠性血红蛋白尿D.G一6一PD缺乏症E.海洋性贫血女性,42岁,表现为贫血和脾大,伴有脱发、皮疹、关节红肿、面部红斑,最可能的诊断是
()是宅基地使用权的权利主体。
500万元-2000万元工程的竣工结算审查时限为从接到竣工结算报告和完整的结算资料之日起()。
塔、容器在安装或现场组装前应检查设备或半成品、零部件的制造质量,应符合()要求方可验收。
作为宏观经济分析的重要工具,简单的菲利普斯曲线概述的是失业率与()之间的相互关系。
认知策略
某夫妇通过创设“宝贝回家”寻子网,帮助走失、被拐儿童回家,唤起社会对走失、被拐儿童的关注。“宝贝回家”寻子网的建立所体现的对未成年人的保护是()。
局域网是分布范围在几千米以内,不超过()的计算机网络。
A、Informationtechnology.B、Computerprogramming.C、Computerprocessing.D、Dataprocessing.D对话中男士想学电脑编程(com—puterprogramming),
最新回复
(
0
)