首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Text1的文本框,并编写如下程序: Option Base 1 Private Sub Form_Click() Dim art Dim Start As Integer,Finish As Integer Sum As In
在窗体上画一个名称为Text1的文本框,并编写如下程序: Option Base 1 Private Sub Form_Click() Dim art Dim Start As Integer,Finish As Integer Sum As In
admin
2015-05-29
29
问题
在窗体上画一个名称为Text1的文本框,并编写如下程序:
Option Base 1
Private Sub Form_Click()
Dim art
Dim Start As Integer,Finish As Integer Sum As Integer
art=Array(12,4,8,16)
Start=LBound(arr):Finish=UBound(arr):Sum=0
For i=Start To Finish
Sum=Sum+arr(i)
Next i
C=Sum|Finish
Text1.Text=c
End Sub
运行程序,单击窗体,则在文本框中显示的是
选项
A、40
B、10
C、12
D、16
答案
B
解析
本题中变量Start存放的是数组的下界,Finish存放数组的上界,因此For循环将遍历整个数组;在每次循环中将数组元素累加到累加和变量Sum中,循环结束后用累加和变量除以数组上界,由于数组下界从0开始,即求出数组平均值。
转载请注明原文地址:https://kaotiyun.com/show/QRQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框,两个名称分别为Label1、Label2、标题分别为空白和“共有文件”的标签。编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框同
在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签,然后编写如下代码:PrivatexAsIntegerPrivateSubCommand1_Click()St
以下关于窗体的描述正确的是
如果一个变量未经定义就直接使用,则该变量的类型为
为了在列表框中使用Ctrl和Shift键进行多个列表项的选择,应将列表框的Multi-select属性设置为
下列叙述中正确的是()。
面向对象的程序设计方法是把【】封装起来作为一个对象,并为每一个对象设置所需要的【】。
下面程序运行后,单击命令按钮,输出的结果是PrivateSubCommand1_Click()Dima%(1To4),b%(2To6),i%,str1#,str2#Fori=
随机试题
信达监理公司承担了一高层砼框架结构工程施工阶段的监理任务,该工程经过招标由某四建工程公司来施工,四建工程公司将桩基工程分包给××地基基础工程公司,由于工程先期招标,监理进入现场时,承包单位和桩基分包单位已进场施工,监理在审核有关资料时未见到该分包单位的资料
乙施工单位的( )依法对本单位的安全生产全面负责。该施工现场发生的两起安全事故,应由( )负责上报当地安全生产监管部门。
()表示最高价与收盘价相同,最低价与开盘价一样,且上下没有影线。
中国已经进入了从国家层面尚美、求美,从社会层面发现美、呼唤美、弘扬美,从个体层面认同美、追随美的时代。用美丽心灵建设美丽中国,需要我们()①大力弘扬中华传统文化②不断加强思想道德修养③推动社会主义文化大发展大繁荣
下列各项中属于我国国防历史的启示的有()。
下列哪些行为引发的争议属于行政诉讼的受案范围?()
2006年新闻类电视节目制作时数相对于1995年的增幅是()。
BernardBailynhasrecentlyreinterpretedtheearlyhistoryoftheUnitedStatesbyapplyingnewsocialresearchfindingsonthe
Lessthantwomonthsintoherbreastcancertreatment,AlexandraJn-CharleswascalledintoanewroomatSUNYDownstateMedical
Waffles?Frenchtoast?Bacon?Bigbreakfastsmaybeathingofthepast.AccordingtotheAssociatedPress,moreAmericansarec
最新回复
(
0
)