首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() Dim a As Variant a=Array(1,2,3,4,5) Sum=0 For i
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() Dim a As Variant a=Array(1,2,3,4,5) Sum=0 For i
admin
2017-11-23
52
问题
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Option Base 1
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的Cliek事件代码里面,定义了数组a,并通过Array函数给数组赋初值。接下来通过For循环计算数组元素的累加和Sum,得到累加和后x=Sum/5来计算平均值。最后通过For循环,打印大于平均值的元素。
转载请注明原文地址:https://kaotiyun.com/show/6fGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
启动VisualBasic,选择标准EXE进入集成环境后,系统为用户启动建立一个窗体,并为该窗体起的临时名称是______。
单击一次命令按钮之后,窗体中的输出结果为______。PrivateSubCommand1_Click()Fori=1To4x=fun(i)Printx;Next
假定建立了一个名为Commandl的命令按钮数组,则以下说法中错误的是______。
在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:PrivateSubForm_Load()Text1.Text=""Text1.SetFocusFori=1To10
在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程:PrivateFunctionf(mAsInteger)IfmMod2=0Thenf=mEls
窗体上有一个用菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如下图所示。下列叙述中错误的是()。
假定在窗体(名称为Form1)的代码窗口中定义如下记录类型:PrivateTypeanimalanimalNameAsString*20aColorAsString*10EndType在窗体上面
下列程序执行后,变量a的值为()。Dima,b,C,dAsSinglea=10:b=20:c=40Ifb>aThend=a:a=b:b=dEndIfIfc>aThen
表达式Abs(-5)+Len("ABCDE")的值是
数学式y2>x>=10在VB中应表示为
随机试题
Rumoristhemost【56】wayofspreadingstories—bypassingthemonfrommouth【57】mouth.Butcivilizedcountriesinnormaltimesha
关于中国古代的法典体例的沿革变化,下列说法正确的是:()
______是指货币供应量少于流通领域对货币实际需求量而引起货币升值。
邓小平指出:“计划经济不等于社会主义,资本主义也有计划;市场经济不等于资本主义,社会主义也有市场。”这一论断表明()。
西红柿:番茄
甲在街头摆气球射击摊,因向顾客提供的六只枪形物被鉴定为枪支,被法院以非法持有枪支罪判处有期徒刑同时宣告缓刑。法院的做法符合()(2018年一专一第41题、2018年一法专一第21题)
下列关于进程的叙述中,正确的是
Braciole3cupstomatosauce11/4cupsflavoredcroutons1/3cupgratedParmesan2eggs1tablespoonchoppedfreshparsley1t
Howmenfirstlearnttoinventwordsisunknown;inotherwords,theoriginoflanguageismystery.Allwereallyknowisthatm
Thesenserelationshipbetween"see"and"sea"is______.
最新回复
(
0
)