首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有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-14
27
问题
窗体上有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
解析
程序中Option Base 0表示指定数组的下标默认下界为0。ReDim语句用来重新定义动态数组,按定义的上下界重新分配存储单元。在一个程序中,可以多次用ReDim语句定义同一个数组,随时修改数组中元素的个数。程序中先执行ReDim a(10),然后执行了ReDim a(5),因此数组a的下界为0,上界为5,共有6个元素。
转载请注明原文地址:https://jikaoti.com/ti/uvN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体文件中有下面的事件过程:PrivateSubCommand1——ClickODimsa%=100PrintaEndSub其中变量a和s的数据类型分别是
假定有以下函数过程:FunctionFun(SAsString)AsStringDimslAsStringFori=1ToLen(S)sl=LCase(Mid(S,i,1))+slNextiFun=slEndFuncti
检查软件产品是否符合需求定义的过程称为
命任何一个滚动条滚动框件过程如下:PrivateSubCommand1_Click()PrivateFunctionf(yAsInteger)X=10Printf(x)f=y*yEndSubEndFunction运行上述程序,如
PrintFormat(1234.56,“###.#”)语句的输出结果是
要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是
设a是整型变量,与函数IIf(a>0,-a,a)有相同结果的代数式是()。
在下面语句或函数中,不能描述选择结构的是
以下能对正实数d的第3位小数四舍五入的表达式是
随机试题
胁痛口苦,胸闷纳呆,恶心呕吐,小便黄赤,舌苔黄腻,脉弦滑数者,治疗宜用
“科技刨新2030”是按照《国家创新驱动发展战略纲要》的要求,部署了一批体现国家战略意图的重大项目,力争到2030年在航空发动机及燃气轮机、量子通信与量子计算、脑科学与类脑研究、新一代人工智能等16个重点方向实现率先突破。该材料表明()
社会保险法的基本原则包括()
患儿,男,7岁。发热半天,出皮疹2天。查体:患儿头皮及颜面、躯干、四肢均可见红色斑丘疹,椭圆形疱疹,四周绕以红晕.伴有痒感。舌苔薄白,脉浮数。应首先考虑的是
以下不属于常用砌筑砂浆的是()
下面属于市场风险因素的是()。
合同中当事人约定了违约金,也约定了定金。合同履行过程中发生违约后,()。
在权益类证券投资的风险中,可称为市场风险的是()。
Agingbabyboomersaredeterminedtofighttheagingprocess.Theyspendmillionsofdollarsayearon【C1】______theyperceiveas
HowmuchdoestheTVcostnow?
最新回复
(
0
)