首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Text1的文本框,并编写如下程序: Option Base1 Private Sub Form Click() Dim arr Dim Start As Integer,Finish As Intege
在窗体上画一个名称为Text1的文本框,并编写如下程序: Option Base1 Private Sub Form Click() Dim arr Dim Start As Integer,Finish As Intege
admin
2019-07-30
60
问题
在窗体上画一个名称为Text1的文本框,并编写如下程序:
Option Base1
Private Sub Form Click()
Dim arr
Dim Start As Integer,Finish As Integer 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
解析
本题中变量Stan存放的是数组的下界,Finish存放数组的上界,因此For循环将遍历整个数组;在每次循环中将数组元素累加到累加和变量Sum中,循环结束后用累加和变量除以数组上界,由于数组下界从0开始,即求出数组平均值。
转载请注明原文地址:https://kaotiyun.com/show/NlUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上添加一个计时器控件,名称为Timer1。请利用属性窗口设置适当属性,使得在运行时可以每隔1秒,调用计时器的Timer事件过程一次。另外,请把窗体
(1)在考生目录下有一个工程文件vbsj3.vbp,窗体上有一个命令按钮cmdNext(标题为“下一个”)。要求:在窗体上建立一个单选按钮数组optItem,含4个单选按钮,标题分别为“A”、“B”、“C”、“D”,初始状态下,“A”为选中状态。如图3—
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画1个名称为Frame1、标题为“项目”的框架;框架内有1个名称为opt1的控件数组,该控件数组含有三个标题分别为“篮球”“排球”“足球”的单选
下面的语句用Array函数为数组变量a的各种元素赋值整数值:
以下关于框架的叙述中,错误的是
设a=“MicrosoftVisualbasic”,则以下使变量b的值为“Visualbasic”的语句是
设a=10,b=4,c=5,d=7,表达式a>bAndNotc
在数据管理技术发展的三个阶段中,数据共享最好的是
检查软件产品是否符合需求定义的过程称为
随机试题
图形的比例指()。
在PowerPoint2003中,设置片内动画有两种方式:动画方案和__________。
男性,65岁,患糖尿病15年,高血压病10年。查体:双下肢轻度水肿。尿蛋白(++),血肌酐160μmol/L,眼底检查示视网膜出现棉絮状软性渗出。为明确该患者是否出现糖尿病肾病,应进行的检查是
恶寒发热同时并见,多为
根据《药品经营监督管理办法》,开办药品批发企业必须具有大学本科以上学历且为执业药师的岗位是
为使谈判成功和达到预期目的,除组建谈判小组、制定好谈判策略、掌握好谈判时机和技巧外,还应有足够的( )。
商品销售收入和营业外收入均属于收入。( )
关于同业拆借市场的特点,下列说法正确的是()。Ⅰ.融资期限短Ⅱ.对市场参与者信誉有较高的要求Ⅲ.市场准入严格Ⅳ.利率由双方协商决定
依次填入下面一段文字横线处的语句,衔接最恰当的一组是()岳麓书院已有一千多年的历史,________,________,________,________,________,________,特别是各处悬挂的历代楹联,散发出浓郁的文化气息
根据下列资料,回答111~115题。2015年,我国快递业务量完成206.7亿件,实现业务收入2770亿元。全年同城快递业务量完成54亿件,同比增长52.3%;实现业务收入400.8亿元,同比增长50.7%。全国异地快递业务量完成148.4亿件,同比增
最新回复
(
0
)