首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Text1的文本框,并编写如下程序: Option Base 1 Private Sub Form_Click() Dim arr Dim Start As Integer, Finish As Integer Dim Su
在窗体上画一个名称为Text1的文本框,并编写如下程序: Option Base 1 Private Sub Form_Click() Dim arr Dim Start As Integer, Finish As Integer Dim Su
admin
2020-07-22
51
问题
在窗体上画一个名称为Text1的文本框,并编写如下程序:
Option Base 1
Private Sub Form_Click()
Dim arr
Dim Start As Integer, Finish As Integer
Dim Sum As Integer
arr=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
解析
程序中将变量arr初始化为有4个元素的数组,使用Lbound和Ubound函数分别获取数组下标的上下限,然后将数组中的元素值相加,用整除运算求它们的平均值。算式可写为(12+4+8+16)/ 4=(40)/4=10。所以答案为B。
转载请注明原文地址:https://kaotiyun.com/show/O8Hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在程序运行时,下面的叙述中正确的是()。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dimarray1(10,10)AsIntegerDimiAs
以下叙述中正确的是()。
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个命令按钮,标题分别是“读数据”和“统计”,请添加两个标签,名称分别为Label1和Label2,标题分别为“出现次数最多的字母是”和“它出现的次数为”;再添加两个名称分别为Text1和Text2,初
下列程序执行后,变量x的值为()。Dima,b,C,dAsSingleDimxAsSinglea=10:b=30:c=400Ifb>aThend=a:a=b:b=dEndIf
假定已在窗体上画了多个控件,其中有一个被选中,为J了存属性窗口中设置窗体的属性,预先应执行的操作是()。
产生100以内(不含100)2位随机整数的VisualBasic表达式是()。
将E-R图转换到关系模式时,实体与联系都可以表示成()。
要使两个单选按钮属于同一个框架,下面三种操作方法中正确的是()。①先画一个框架,再在框架中画两个单选按钮②先画一个框架,再在框架外画两个单选按钮,然后把单选按钮拖到框架中③先画两个单选按钮,再画框架将单选按钮框起来
设a=2,b=3,c=4,d=5,下列表达式的值是()。3>2%Ora=cAndb<>cOrb<>a+c
随机试题
在国际货币基金组织的货币层次划分中,M1=M0+()。
某事业单位销售产品一批,单价2000元,共1万件,价款已入账,增值税率17%,一个月后,购货单位退回不合格品400个,共800000元。要求:编制该事业单位的会计分录。
编制路线价修正系数表考虑的因素主要有()。
我没有摘花的习惯。我只是伫立凝望,觉得这一条紫藤萝瀑布不只在我眼前,也在我心上缓缓流过。流着流着,它带走了这些时候一直压在我心上的焦虑和悲痛,那是关于生死谜、手足情的。我浸在这繁密的花朵的光辉中,别的一切暂时都不存在,有的只是精神的宁静和生的喜悦。
波斯帝国衰亡的原因。
海上民族
设曲线y=x2+ax+b与曲线2y=xy3一1在点(1,一1)处切线相同,则().
根据《中华人民共和国著作权法》,()是不正确的。
排列顺序。例如:A可是今天起晚了B平时我骑自行车上下班C所以就打车来公司BACA还是从健康的角度看B无论是从味道上看C这道菜都值得点
AlongtimeaidetoPresidentBushwhowroteoccasionalguestcolumnsforhishometownnewspaperresignedonFridayeveningafter
最新回复
(
0
)