首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Option Base1 Private Sub Commandl_Click() Dim a As Variant a=Array(1,2,3,4,5)
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Option Base1 Private Sub Commandl_Click() Dim a As Variant a=Array(1,2,3,4,5)
admin
2020-04-18
43
问题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:
Option Base1
Private Sub Commandl_Click()
Dim a As Variant
a=Array(1,2,3,4,5)
Sum=0
For i=1 To 5
Sum=Sum+a(i)
Next i
x=Sum/5
For i=1 To 5
If a(i)>x then Print a(i)
Next i
End Sub
程序运行后,单击命令按钮,在窗体上显示的内容是
选项
A、12
B、123
C、345
D、45
答案
D
解析
本题考查数组和循环。在Commandl的Click事件代码里面,定义了数组a,并通过Array函数给数组赋初值。接下来通过For循环计算数组元素的累加和Sum,得到累加和后x=Sum/5来计算平均值。最后通过For循环,打印大于平均值的元素。
转载请注明原文地址:https://kaotiyun.com/show/UZTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果在框架中画了2个复选框,且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True,则下面叙述中正确的是
窗体上有一个名称为Timer1的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下:PrivateSubForm_Load()Shapel.Top=0:Timerl.Interval=100
下列关于滚动条的叙述中,错误的是
设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:PrivateSubCommandl_Click()DimslAsString,s2AsStringO
以下关于图片框、图像框的叙述中,正确的是
设窗体上有2个直线控件Linel和Line2,若使两条直线相连接,需满足的条件是
下面程序运行时,若输入395,则输出结果是PrivateSubCommandl_Click()Dimx%x=InputBox(”请输入一个3位整数”)PrintxMod10,x\100,(xMod
设窗体上有一个命令按钮数组,能够区分数组中各个按钮的属性是
有下面程序代码:PrivateSubCommand1Click()DimaAsStringa=“COMPUTER”n=so~eh(a,“T”):PrintUtln=0,“未找到”,n)EndSubPrivateFunction
随机试题
在课堂教学中,教师各方面的品质都是学生模仿的标准。研究表明,成功的教师,包括在课堂上活跃气氛的老师,应当具有()等心理素质。
冠心病治疗中治疗稳定斑块应首选_______。
在德国莱比锡大学建立世界上第一个心理学实验室,使心理学成为一门独立科学的学者是
下列不是脓疱疮的典型皮损的是
“……造成了一个弥漫着书香的世界,使中华民族成为世界上最具书卷气的民族,甚至目不识丁者也知‘敬惜字纸’,普遍有一种对于文字、文献的崇拜。”这一现象出现的原因是()。
无端的就被她魅惑,感染着这个美丽的小女子似乎释放不完的激情。今日再见,便如故友重逢,看她上场,便__________,看她离去,便__________,听到欢呼声盈耳,便几乎要__________了。依次填入画横线部分最恰当的一项是()。
(2016河北)三个连续的奇数,后两数之积与前两数之积的差为2004,则这三个数中最小的数为多少?
EveryoneknowshowtogettoCarnegieHall:practice,practice,practice.Butwhatabouthowtogetintothenation’smosthonor
Evenwhenourabilitytospendandsocialisehasbeencurtailedindrasticways,wealthanddeprivationmakethemselvesfeltas
Linguistshavefoundthatsignlanguagesandspokenlanguagessharemanyfeatures.Likespokenlanguages,whichuseunitsofsou
最新回复
(
0
)