首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为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
53
问题
在窗体上画一个名称为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全国计算机二级
相关试题推荐
窗体上有一个名称为Shapel并显示为圆的形状控件(其Width和Height属性值相等),一个名称为Timerl的计时器,并有下面程序代码:DimrAsSingle,flagAsIntegerPrivateSubForm
窗体上有一个名称为Timer1的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下:PrivateSubForm_Load()Shapel.Top=0:Timerl.Interval=100
窗体上有一个名称为HScroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是
以下不属于VisualBasic数据文件的是
工程中有Form1、Form2两个窗体(Forml中有文本框Text1:Form2中有Text1文本框和Command1命令按钮)。Form1是启动窗体。在这些模块中编写下面的程序代码:Forml中的代码如下:PrivateSubT
以下关于图片框、图像框的叙述中,正确的是
输入VB源程序时,若一个命令行中包含两个语句,则两个语句之间的分隔符应使用
以下程序的功能是随机产生10个两位的整数:OptionBase1PrivateSubCommandl_Click()Dima(10)AsInteger,iAsIntegerRandomize
下面关于直线控件的叙述中正确的是
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()a$=InputBox("请输入一个二进制数"):n=Len(a$)Fori=1TonDec=Dec*2+_
随机试题
某沿海地区,很多人出现了肢端感觉麻木、向心性视野缩小、共济运动失调等症状,还有很多婴儿出生不久也会出现以上症状,并且更严重。这是由于食用的鱼贝类中含过多的
已知某建设项目在达产后年经营成本为600万元,年营业费用为200万元,其中其他营业费用的比例为l5%,产成品的周转次数为10次,则产成品的估算值为()万元。
背景资料: 某项目部承担了一项程控交换设备安装工程,采用包工不包料方式承包,约定工期为40天。 开工前,项目部指派技术员进行现场考察,明确了施工用电及空调设施、现场的特殊要求等情况,同时根据施工图设计对机房地板、需要安装的设备位置及数量等进行复核。
导致钻孔灌注桩施工中断桩的原因有()。
甲、乙公司属于非同一控制下的独立公司。2008年1月1日,甲公司取得乙公司60%的股份。合并中,甲公司以持有的固定资产作为合并对价,该固定资产原值1000万元,已计提折旧100万元,已提取减值准备40万元。2008年1月1日,该固定资产公允价值为1100万
下列各项中,属于经济法律关系的有( )。
下列四项为中国近代不同时期的考题,其中19世纪70年代初洋务学堂使用的考题应是()。
《刑法修正案(八)》取消了下列哪些犯罪的死刑?()
Shehopedthatalongrestmight______herinhealth.
Mattcheachstatementwiththecorrectperson,A-G.Writethecorrectletter,A-G,inboxes20-26onyouranswersheet.
最新回复
(
0
)