首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base0 Dim a()As Integer,m As Integer Private Sub Command1_Click() m=InputBox("请输入一个正
窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base0 Dim a()As Integer,m As Integer Private Sub Command1_Click() m=InputBox("请输入一个正
admin
2018-06-20
27
问题
窗体上有Command1、Command2两个命令按钮。现编写以下程序:
Option Base0
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
解析
程序中Option Base0表示指定数组的下标默认下界为0。ReDim语句用来重新定义动态数组,按定义的上下界重新分配存储单元。在一个程序中,可以多次用ReDim语句定义同一个数组,随时修改数组中元素的个数。程序中先执行ReDim a(10),然后执行了ReDim a(5),因此数组a的下界为0,上界为5,共有6个元素。
转载请注明原文地址:https://jikaoti.com/ti/Spy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCommandl_Click()DimiAsInteger,nAsInteger
以下关于单选按钮和复选框的叙述中,正确的是
为了使命令按钮的Picture、DownPicture或DisabledPicture属性生效,必须把它的Style属性设置为
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml的窗体上画一个名称为Framel、标题为”目的地”的框架,在框架中添加三个复选框,名称分别为Checkl、Check2、Check3,其标题分别是”上海”、”
算法一般都可以用哪几种控制结构组合而成()。
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
若实体A和B是一对多的联系,实体B和C是一对一的联系,则实体A和C的联系是
支持子程序调用的数据结构是( )。
某二叉树的前序序列为ABCDEFG,中序序列为DCBAEFG,则该二叉树的深度(根结点在第1层)为
随机试题
在铁路工程项目站前工程施工中,线上工程工期主要是指()的工期。
周丹和焦海是夫妻,后周丹以感情破裂为由,起诉离婚。周丹委托其父亲周涛为诉讼代理人,焦海委托律师翟伟为诉讼代理人,下列做法错误的是:()
在生产经营活动中,因违章指挥造成事故的人员,应对事故负()责任。
老王失业了,如果他想领取失业保险金,那么他需要满足的条件有()。
每个人,都是作家,身后都留有一部著作。有的著作,是用笔写成的;有的著作,是用脚印写成的。人生旅途上,烙下一个个脚印。一个脚印是一个字;几个脚印是一个词;一串脚印,是一个句子;一路脚印,是一部著作。暮年回首走过的路,一部巨著,闪闪亮亮,展现在眼前。笔写的著作
玉米汁:玉米
一组数据(30,20,10,15,35,1,10,5),用堆排序(小顶堆)的筛选方法建立的初始堆为()。
Whentravelerslackanawarenessof【51】timeisregulatedinaforeigncountry,theycanexpecttofeelsomewhatdisoriented.S
"Untilrecently,Ithoughtthattherewouldneveragainbeanopportunitytobeinvolvedwithanindustryassociallydestructiv
A、TeensshouldusetheInternetasanimportanttooloftheirdailylife.B、Teensshouldtakeregularbreaksfromtheircomputer
最新回复
(
0
)