首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序的功能是:从键盘输入若干个自然数,输入-1则结束输入,然后计算平均值输出(因事先不知道执行时会输入多少个数,定义一个动态数组存放这些数)。 Private Sub Command1_Click() Dim a() As Integer
下面程序的功能是:从键盘输入若干个自然数,输入-1则结束输入,然后计算平均值输出(因事先不知道执行时会输入多少个数,定义一个动态数组存放这些数)。 Private Sub Command1_Click() Dim a() As Integer
admin
2015-06-30
87
问题
下面程序的功能是:从键盘输入若干个自然数,输入-1则结束输入,然后计算平均值输出(因事先不知道执行时会输入多少个数,定义一个动态数组存放这些数)。
Private Sub Command1_Click()
Dim a() As Integer
n = 0
Do
x = InputBox("请输入一个自然数,输入-1结束")
If x <> -1 Then
n = n + 1
___________
a(n) = x
End If
Loop Until x = -1
For k = 1 To n
s = s + a(k)
Next
Print s / n
End Sub
以上程序不完整,应在横线处填写的是
选项
A、ReDim a(n)
B、ReDim Preserve a(n)
C、ReDim a
D、ReDim a()
答案
B
解析
这是求输入数据平均数的程序。 Dim a() As Integer为动态数组,其数组元素均为整型,在过程中用Redim语句来定义带下标的数组,格式ReDim 变量(下标) AS 类型名称,这里空白处就是要用ReDim语句定义,这一语句用来重新分配数组,按照定义的下标上、下界重新分配存储单元。当重新分配动态数组时,数组中的内容将被清除,如果ReDim中使用了Preserve选择项,则不清除数组内容。对于题目中,每次执行循环体,将输入数据赋值给数组,需要保留上次执行的数组数据,故需要使用Preserve选项,B项正确。
转载请注明原文地址:https://kaotiyun.com/show/HgQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下程序:PrivateSubCommand1_Click()s=0Dos=(s+1)((s+2)N=N+1LoopUntils>=10P
以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组,然后画一个名为Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输入7个分数,单击“计算得分”命令按钮,则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分
下面关于数据库系统的叙述正确的是
设A="345678",则表达式Val(Mid(A,4,2)+Right(A,4))的值为______。
如果要在程序代码中为图片框动态加载或清除图形,可以通过()函数来实现。
假设有以下程序段:Fori=1To3Forj=5To1Step-1Printi*jNextjNexti则语句Printi*j的执行次数是______,i的值为______,j的值为___
假定有一个菜单,名为Menultem,为了运行时使该菜单项失效,应使用的语句为()
设通用对话框控件的名称为CD1,希望在打开文件对话框中的“文件类型”列表中包含:所有文件、Word文档和文本文件这3类文件,在程序中设置Filter属性时正确的是
下列表达式有错误,正确的写法应该是【】。[(a+B)+c]/80-5÷(d+e)
随机试题
Iprefer______.
校准证书上给出标称值为1000g的不锈钢标准砝码质量ms的校准值为1000.000325g,且校准不确定度为24μg(按三倍标准偏差计),求砝码的标准不确定度。
下列应收帐款符合企业所得税有关坏账处理条件的有( )。
下列哪个公式是正确的()。
基于供应的配送中心模式所从事的配送活动是一种纯粹的物流活动,其业务属于交货代理服务。()
A.条件(1)充分,但条件(2)不充分B.条件(2)充分,但条件(1)不充分C.条件(1)和(2)单独都不充分,但条件(1)和条件(2)联合起来充分D.条件(1)充分,条件(2)也充分E.条件(1)和(2)单独都不充分,两个条件联合起来也不充分
基于空间分布的管理信息系统结构可分为()。
以下选项中,能用作用户标识符的是
TheRainforestCityA)Apatchoftropicalrainforesthastwicethenumberofmammalspecies,fivetimesthebatsandbirdsand
Itisbelieved(that)reading____________(增加我们的知识)andbroadensourmind.
最新回复
(
0
)