首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Textl的文本框,并编写如下程序: Option Base 1 Private Sub Form_C lick() Dim arr Dim Start As Integer,Fi
在窗体上画一个名称为Textl的文本框,并编写如下程序: Option Base 1 Private Sub Form_C lick() Dim arr Dim Start As Integer,Fi
admin
2019-07-30
51
问题
在窗体上画一个名称为Textl的文本框,并编写如下程序:
Option Base 1
Private Sub Form_C lick()
Dim arr
Dim Start As Integer,Finish As Integer Sum As Integer
air=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
Textl.Text=C
End Sub
运行程序,单击窗体,则在文本框中显示的是
选项
A、40
B、10
C、12
D、16
答案
B
解析
本题中变量Start存放的是数组的下界,Finish存放数组的上界,因此For循环将遍历整个数组;在每次循环中将数组元素累加到累加和变量Sum中,循环结束后用累加和变量除以数组上界,由于数组下界从0开始,即求出数组平均值。
转载请注明原文地址:https://kaotiyun.com/show/LYUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为List1的列表框,然后编写如下程序:Form_Click()Item="Item"&i:List1.AddItemEndSub程序运行时,单击窗体,所完成的功能是
设Label1、Command1、Text1、Check1分别为标签、命令按钮、文本框、复选框的名称,则以下属性设置语句中,运行时不会出错的是
窗体上有一个名称为Shapel并显示为圆的形状控件(其width和Height属性值相等),一个名称为Timer1的计时器,并有下面程序代码:DimrAsSingle,flagAsIntegerPrivateSubForm
设窗体上有一个Text1文本框和一个HScroll1水平滚动条,并有下面的事件过程:PrivateSubHScroll1_Change()Text1=HScroll1EndSub在程序运行时,当把滚动框移动到最
编写如下程序:PrivateSubCornmandlClick()DimXAsInteger,yAsIntegerx=1:y=1Doy=x*yIfv>10ThenE
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序:PrivateSubCommand1_Click()Dimcount(10)As
鼠标拖放控件要触发两个事件,这两个事件是
表达式2*3^2+4*2/2+3^2的值是
为了使标签控件在显示其内容时不覆盖其背景内容,需进行设置的属性为
随机试题
A、酸提取碱沉淀法B、碱提取酸沉淀法C、超临界流体萃取法D、醇/水法E、水/醇法提取挥发油的方法是
A.肌肤水肿,无汗,身体疼痛B.胸胁胀满,咳唾引痛C.胸闷,咳喘,不能平卧,其形如肿D.喉中有物,吞之不下,吐之不出E.肠鸣辘辘有声饮留胸胁则见
企业从银行取得借款直接偿还应付购货款,所属经济业务类型是()。
下列支出中,属于营业外支出的有()。
国家风险限额管理基于对一个国家的综合评级,该评级包括()。
一般资料:求助者,男性,19岁,大学一年级学生。求助者主述:近两个月来,严重失眠,影响学习,很苦恼。求助者自诉:小时候得过鼻炎,总是流鼻涕,觉得别人都很讨厌我。后来因肠胃炎多次住院,因此认为自己是最倒霉的。从小父亲对我要求很严,总拿我和
Theround.the—clock(24小时不断的)availabilitythatcellphoneshavebroughttopeople’slivesmaybetakingatollonfamilylife,an
1,3,3,9,12,36,42,()。
项目团队中丰要负责质量控制的成员应当具有统计知识,以完成质量控制活动。其中,最重要的知识是(49)。
Anaturalresponseofcommunitiesdevastatedbyearthquakeorfloodistorebuildonthesamesite,overlookingthepossibility
最新回复
(
0
)