首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() Dim a As Variant a=Array(1,2,
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() Dim a As Variant a=Array(1,2,
admin
2017-06-21
4
问题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:
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)
Net i
End Sub
程序运行后,单击命令按钮,在窗体上显示的内容是
选项
A、12
B、123
C、345
D、45
答案
D
解析
本题考查数组和循环。在Commandl的Click事件代码里面,定义了数组a,并通过Array函数给数组赋初值。接下来通过For循环计算数组元素的累加和Sum,得到累加和后x=Sum/5来计算平均值。最后通过For循环,打印大于平均值的元素。
转载请注明原文地址:https://jikaoti.com/ti/MBy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在设计程序时,应采纳的原则之一是()。
在软件工程中,白盒测试法可用于测试程序的内部结构。此方法将程序看做是______。
假定窗体上有一个标签,名为Label1,为了使该标签透明并且没有边框,则正确的属性设置为()。
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整()。PrivateTypeAngKAsIntegerSinx
在VisualBasic中,被称为对象的是
在窗体上画一个名称为Commandl的命令按钮。有下列程序:OptionBase1PrivateSubCommand1_Click()Dimaa=Array(45,27,34,24,91,37
下面叙述正确的是
下列过程定义语句中,参数不是对象的定义语句是
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
软件工程的出现是由于
随机试题
骨折愈合过程包括_______、_______、_______、_______4个阶段。
甲上市公司自行研究开发一项专利技术,与该项专利技术有关的资料如下:(1)20×7年1月,该项研发活动进入开发阶段,以银行存款支付开发费用280万元,其中满足资本化条件的为150万元。20×7年7月1日,开发活动结束,并按法律程序申请取得专利权,供
患者,女性,19岁,张口受限十余年,幼时有左侧中耳炎病史。查体:开口度不足一指,左侧下颌体小、面部丰满,右侧下颌狭长。此患者最可能诊断是
何某,24岁,女,工人,2013年5月21日就诊。停经44天,恶心呕吐1周。末次月经2013年4月6日。近5天来,恶心呕吐逐渐加重,呕吐物为酸苦水,胸胁满闷,口苦咽干,口渴,喜冷饮,大便千,尿少而黄,舌红苔黄燥,脉弦滑数。尿早孕试验阳性。辨证为
女性,23岁,间断发热、关节痛1年,半月来高热、皮疹、下肢水肿;血压120/80mmHg,皮肤无紫癜,肝脾不大,尿蛋白(+++),尿红细胞5~10个/HP,颗粒管型偶见,Hb98g/l,网织红细胞5%,血BUN7mmol/L。本例最可能的诊断
下列关于“运用资本资产定价模型估计权益成本”的表述中,错误的是()。
2×21年1月1日,经股东大会批准,甲公司向50名高管人员每人授予1万份股票期权。根据股份支付协议规定,这些高管人员自2×21年1月1日起在甲公司连续服务满3年,即可以每股5元的价格购买1万股甲公司普通股股票。2×21年1月1日,每份股票期权的公允价值为1
皮亚杰通过大量研究,发现并总结出了儿童道德认知发展的总规律,即儿童道德的发展经历从他律到自律的转化发展过程。()
被英国学者李约瑟称为“中国科技史上最卓越的人物”的是北宋科学家沈括。()
—IwonderwhyTomwaspromotedtogeneralmanagerinsteadofAnn.—______.I’msurprisedthatAnndidn’tgetthejob.
最新回复
(
0
)