参考答案:
[解题思路]表达式Int(Rnd*A000)可生成0~A000范围内随机整数。根据题意求出B0个随机整数的平均值,须用For循环语句逐一将数组中的各元素累加到变量Sum,然后求出平均值。[操作步骤]步骤A:打开本题工程文件。步骤B:分析并编写程序代码。程序提供代码OptionBaseAPrivateSubCommandA_Click()DimarrN(B0)AsIntegerDimAverAsSingleDimSumAsInteger,iRandomizeFori=AToB0’an’N(i)=Int(Rnd*)Nexti’Sum=Fori=AToB0’Sum=Nexti’Aver=PrintAverEndSub程序结束第A个处填入:A000第B个处填入:0第C个处填入:Sum+arrN(i)第D个处填入:Sum/B0步骤C:调试并运行程序,关闭程序后按题目要求存盘。