窗体上有Command1、Command2两个命令按钮。现编写以下程序：Option Base 0Dim a()As Integer， m As IntegerPrivate Sub Command1_Click() m＝InputBox("请输入一个正整数") ReDim a(m)End SubPrivate Sub Command2_Click() m＝InputBox("请输入一个正整数") ReDim a(m)End Sub运行程序时，单击Command1后输入整数10，再单击Command2后输入整数5，则数组a中元素的个数是( )。
- A.5
- B.6
- C.10
- D.11
热度🔥649
参考答案：B
解析：
【解析】程序中Option Base 0表示指定数组的下标默认下界为0。ReDim语句用来重新定义动态数组，按定义的上下界重新分配存储单元。在一个程序中，可以多次用ReDim语句定义同一个数组，随时修改数组中元素的个数。程序中先执行ReDim a(10)，然后执行了ReDim a(5)，因此数组a的下界为0，上界为5，共有6个元素。
【解析】程序中Option Base 0表示指定数组的下标默认下界为0。ReDim语句用来重新定义动态数组，按定义的上下界重新分配存储单元。在一个程序中，可以多次用ReDim语句定义同一个数组，随时修改数组中元素的个数。程序中先执行ReDim a(10)，然后执行了ReDim a(5)，因此数组a的下界为0，上界为5，共有6个元素。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
有汇编程序段如下
CODES SEGMENT
ASSUME CS:CODES
START: MOV CX, 30
XOR AX, AX
MOV BX, 1
AGAIN: ADD AX, BX
INC BX
LOOP AGAIN
CODES ENDS
END START
程序执行后，AX和BX的内容分别是
缩写O2O代表的电子商务模式是（ ）。
阿文是某食品贸易公司销售部助理，现需要对2015年的销售数据进行分析，根据以下要求，帮助她完成此项工作。 1. 在考生文件夹下，将“Excel_素材.xlsx”文件另存为“Excel.xlsx”（“.xlsx”为文件扩展名），后续操作均基于此文件，否则不得分。 2. 命名“产品信息”工作表的单元格区域A1:D78名称为“产品信息”；命名“客户信息”工作表的单元格区域A1:G92名称为“客户信息”。 3. 在“订单明细”工作表中，完成下列任务： ① 根据B列中的产品代码，在C列、D列和E列填入相应的产品名称、产品类别和产品单价（对应信息可在“产品信息”工作表中查找）。 ② 设置G列单元格格式，折扣为0的单元格显示“-”，折扣大于0的单元格显示为百分比格式，并保留0位小数（如15%）。 ③ 在H列中计算每订单的销售金额，公式为“金额=单价×数量×(1-折扣)”，设置E列和H列单元格为货币格式，保留2位小数。 4. 在“订单信息”工作表中，完成下列任务： ① 根据B列中的客户代码，在E列和F列填入相应的发货地区和发货城市（提示：需首先清除B列中的空格和不可见字符），对应信息可在“客户信息”工作表中查找。 ② 在G列计算每订单的订单金额，该信息可在“订单明细”工作表中查找（注意：一个订单可能包含多个产品），计算结果设置为货币格式，保留2位小数。 ③ 使用条件格式，将每订单订货日期与发货日期间隔大于10天的记录所在单元格填充颜色设置为“红色”，字体颜色设置为“白色,背景1”。 5. 在“产品类别分析”工作表中，完成下列任务： ① 在B2:B9单元格区域计算每类产品的销售总额，设置单元格格式为货币格式，保留2位小数；并按照销售额对表格数据降序排序。 ② 在单元格区域D1:L17中创建复合饼图，并根据样例文件“图表参考效果.png”设置图表标题、绘图区、数据标签的内容及格式。 6. 在所有工作表的最右侧创建一个名为“地区和城市分析”的新工作表，并在该工作表A1:C19单元格区域创建数据透视表，以便按照地区和城市汇总订单金额。数据透视表设置需与样例文件“透视表参考效果.png”保持一致。 7. 在“客户信息”工作表中，根据每个客户的销售总额计算其所对应的客户等级（不要改变当前数据的排序），等级评定标准可参考“客户等级”工作表；使用条件格式，将客户等级为1级～5级的记录所在单元格填充颜色设置为“红色”，字体颜色设置为“白色,背景1”。 8. 为文档添加自定义属性，属性名称为“机密”，类型为“是或否”，取值为“是”。
可以在PowerPoint内置主题中设置的内容是（ ）。
