窗体上有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
热度🔥623
参考答案：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年计算机等级考试题库
推荐
对要求输入相对固定格式的数据，例如电话号码010－83950001，应定义字段的( )。
若有以下程序
#include
main()
{ int a=1,b=2,c=3,d=4, r=0;
if (a!=1) ; else r=1;
if (b==2) r+=2;
else; if (c!=3) r+=3;
else; if (d==4) r+=4;
printf("%d\n", r);
}
则程序的输出结果是
以下不能触发滚动条Change事件的操作是( )。
在Word文档编辑状态下，将光标定位于任一段落位置，设置1.5倍行距后，结果将是（ ）。
小李是东方公司的会计，利用自己所学的办公软件进行记账管理，为节省时间，同时又确保记账的准确性，她使用Excel编制了2014年3月员工工资表"Excel.xlsx"。请你根据下列要求帮助小李对该工资表进行整理和分析（提示：本题中若出现排序问题则采用升序方式）：（1）通过合并单元格，将表名"东方公司2014年3月员工工资表"放于整个表的上端、居中，并调整字体、字号。（2）在"序号"列中分别填入1到15，将其数据格式设置为数值、保留0位小数、居中。（3）将"基础工资"（含）往右各列设置为会计专用格式、保留2位小数、无货币符号。（4）调整表格各列宽度、对齐方式，使得显示更加美观。并设置纸张大小为A4、横向，整个工作表需调整在1个打印页内。（5）参考考生文件夹下的"工资薪金所得税率.xlsx"，利用IF函数计算 "应交个人所得税"列。 (提示：应交个人所得税=应纳税所得额*对应税率-对应速算扣除数)（6） 利用公式计算"实发工资"列，公式为：实发工资=应付工资合计-扣除社保-应交个人所得税。（7）复制工作表"2014年3月"，将副本放置到原表的右侧，并命名为"分类汇总"。（8） 在"分类汇总"工作表中通过分类汇总功能求出各部门"应付工资合计"、"实发工资"的和，每组数据不分页。
