首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Textl的文本框,并编写如下程序: OptionBase 1 Private Sub Form_Click() Dim art Dim StartAs Integer,FinishAs Integer SumAs Integer ar
在窗体上画一个名称为Textl的文本框,并编写如下程序: OptionBase 1 Private Sub Form_Click() Dim art Dim StartAs Integer,FinishAs Integer SumAs Integer ar
admin
2019-04-29
79
问题
在窗体上画一个名称为Textl的文本框,并编写如下程序:
OptionBase 1
Private Sub Form_Click()
Dim art
Dim StartAs Integer,FinishAs Integer SumAs Integer
art=Array(12,4,8,16)
Start=LBound(arr):Finish=UBound(arr):Sum=0
For i=StartTD Finish
Sum=Sum+art(i)
Next i
c=Sum/Finish
Text1.Tex
选项
A、40
B、10
C、12
D、16
答案
B
解析
本题中变量Start存放的是数组的下界,Finish存放数组的上界,因此For循环将遍历整个数组;在每次循环中将数组元素累加到累加和变量Sum中,循环结束后用累加和变量除以数组上界,由于数组下界从0开始,即求出数组平均值。
转载请注明原文地址:https://kaotiyun.com/show/j9Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
命任何__个滚动条滚动框件过程如下:PrivateSubCommandl_Click()PrivateFunctionf(yAsInteger)x=10Printfix)f=y*yEndSubEndFunction运行上述程序
下列操作中不能向工程添加窗体的是
下列叙述中正确的是
以下过程的功能是从数组中寻找最大值:PrivateSUbFindMax(aOAsInteger,ByRefMaxAsInteger)DimSAsInteger,fAsIntegerDimiAsIntegerS=LBoun
有下面程序代码:PrivateSubCommandl—Click()a=Array(1,2,3,4,5,6,7,8,9,10)n=UBound(a)Fork=0ToUBound(a)/2Printa(k)*a(n);n=11-lNextk
在面向对象的程序设计中,可被对象识别的动作称为
如果要在窗体上使用2组单选按钮,每组都可以有一个被选中,则应该做的是
下列不属于计时器控件属性的是
有数据定义语句:Dima,bAsIntegerDimx%,yasInteger执行语句后,不是整型变量的是
下列是VisualBasic中所允许的形式数是()。
随机试题
认为领导并不一定完全是上下级之间的命令与服从关系,下级也可能有领导上级的机会,这种观点属于一般行为领导理论中的()
系统分析中规范研究主要应用的方法是【】
A.乙状结肠和直肠B.回肠C.结肠特别是乙状结肠D.回盲部伤寒常累及
A.周围血嗜酸粒细胞增多B.周围血中性粒细胞增多C.周围血中性粒细胞减少D.周围血浆细胞增多>2.0×109/LE.骨髓粒系各阶段细胞均见增多,以中幼粒、晚幼粒细胞增多为主
甲为乙企业设立的分支机构,甲在经营活动过程中与丙企业签订货物运输合同,后甲分支机构在运输货物的过程中因重大过失造成大量货物毁损,给丙企业带来巨大经济损失,现丙企业欲向法院提起诉讼要求获得相应赔偿。则关于本案的被告,下列说法中正确的是:(
黄某采用住房抵押贷款方式购买了一套总价30万元的房子,贷款20万元,年期20年,抵押贷款月还款系数为0.006924。黄先生住了2年后,想将房子租出,于是委托A中介公司的经纪人小张代为招租,在未租出前房屋仍由黄先生管理。其中小张通过各种方法推出黄先生的房源
消防安全对策、措施及建议的内容应具有()。
下列选项中属于承揽合同的是()
A、She’stoobusytorunforclasspresident.B、Shehasn’tconsideredrunningforclasspresident.C、Sheplanstoapplyforapar
Thephrase"progressiveeducation"isone,ifnotprotest,atleastofcontrast,ofcontrastwithaneducationwhichwaspredomi
最新回复
(
0
)