首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Commandl、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Command1_Click() m
窗体上有Commandl、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Command1_Click() m
admin
2019-08-21
36
问题
窗体上有Commandl、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
运行程序时,单击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://jikaoti.com/ti/MYN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个通用对话框,程序运行中用ShowOpen方法显示“打开”对话框时,希望在该对话框的“文件类型”栏中只显示扩展名为DOC的文件,则在设计阶段应把通用对话框的Filter属性设置为
编写如下程序:PrivateSubCommandl_Click()DimxAsInteger,yAsIntegerx=1:y=1Doy=x*yIfy>10ThenExitDoElsex=x+3E
下面关于控件数组的叙述中正确的是
以下过程的功能是从数组中寻找最大值:PrivateSubFindMax(a()AsInteger,ByRefMaxAsInteger)DimSAsInteger,fAsInteger:DimiAsIntegerS=LBo
以下关于数组的叙述中,错误的是
假定一个工程由一个窗体文件Form1和两个标准模块文件Mode11和Mode12组成Mode11的代码如下:PublicxAsInteger:PublicyAsIntegerSubS1()
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为CD1的通用对话框,通过属性窗口设置CD1的初始路径为C:\,默认的文件名为None,标题为“保存等级考试”,如图2所示。注意:存
关系模型允许定义3类数据约束,下列不属于数据约束的是()。
设一棵满二叉树共有15个结点,则在该满二叉树中的叶子结点数为()。
下列数据结构中,属于非线性结构的是()。
随机试题
败血症的定义是什么?
猫,2岁,雌性,近来经常做伸颈姿势,有食欲,但吞咽困难,流涎,咽部触诊疼痛敏感性增高并伴有咳嗽,则该患猫最可能患有
检查“注射液的装量”时,需使用的器具有
某城市进行城市道路改造,拟新建一条长10km的城市一级道路,承包商为了保证工程按期按质完成,在施工前首先编制了施工组织设计,在编制路基工程施工组织设计时,除了与总体施工组织设计内容基本相同外,还根据路基工程施工的自身特点,在确定施工方案和进度计划时,重点考
甲公司和乙公司于2015年8月1日拟定了一份书面合同,标的额为100万元,以银行承兑汇票结算相关款项。该合同拟定后,甲公司随即签章,而乙公司则未在合同中签章。2015年8月10日,甲公司将上述合同项下的标的物发送给乙公司,乙公司收货后于8月15日签发一张出
《义务教育音乐课程标准(2011年版)》共有()个基本理念。
最早明确提出“以形写神”为中心传神论的画家是________时代的________,其代表作品是________、________。
在VisualFoxPro中,关系数据库管理系统所管理的关系是()。
IhopeyouwillgivemethepleasureofyourcompanyontheoccasionofadinnerwithafewfriendsnextSaturday,the15th,at
【B1】【B7】
最新回复
(
0
)