首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Command1_Click()
窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Command1_Click()
admin
2020-04-18
21
问题
窗体上有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://jikaoti.com/ti/Tcx0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体中有一个文本框Text1,若在程序中执行了Text1.SetFocus,则触发( )。
以下控件中,能够作为容器使用的是
阅读下面的程序代码:PrivateSubCommand1_Click()Printfun(748639,5)EndSubPrivateFunctionfun(xAsLong,aAsInteger)
设有如下程序:OptionBase0PrivateSubForm_Click()DimaDimiAsIntegera=Array(1,2,3,4,5
下列说法中正确的是()。
设整型变量a、b已赋值(b>0,a>b),下面不能正确计算a除以b的余数的表达式是
以下关于菜单的叙述中,错误的是( )。
下列关于栈的叙述正确的是( )。
设有关键码序列(Q,G,M,Z,A,N,B,P,X,H,Y,S,T,L,K,E),采用堆排序法进行排序,经过初始建堆后关键码值B在序列中的序号是()。
窗体上有1个名称为List1、含有3个项目的列表框,1个名称为Text1的文本框,以及1个Interval属性值为1000的计时器控件Timer1。某人编制了以下程序,希望程序运行时,每隔1秒,List1中的3个项目能够依次在Text1中循环显示。
随机试题
大众传播的内容应力求
习近平形象地指出,理想信念是共产党人精神上的“钙”,没有理想信念,或理想信念不坚定,精神上就会“缺钙”,就会得“软骨病”。中国共产党人的理想信念是【】
InBritain,peoplehavedifferentattitudestothepolice.Mostpeoplegenerally【C1】______themandthejobtheydo—althoughther
A.12~1月B.2~4月C.5~6月D.7~9月E.10~12月
数据电文申报包括()。
在教学过程中集中学生的注意力的方法有()。
以下叙述中正确的是()。
Researcherssaypeopletravelingintrafficarethreetimesmorelikelytosufferaheartattack.Theysaytheriskofahearta
Togetachocolateoutofaboxdemandsaconsiderableamountofunpacking:theboxhastobetakenoutofitspaperbagthepla
A、Sheplanstohavethemanmakeatourarrangementforher.B、Shehopesthathecouldgivehersomeadviceonwriting.C、Shewa
最新回复
(
0
)