首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有名称为Commandl的命令按钮,其事件过程如下: Option Base 1 Private Sub Command l_Click() Dim a Dim b(10)As Integer
窗体上有名称为Commandl的命令按钮,其事件过程如下: Option Base 1 Private Sub Command l_Click() Dim a Dim b(10)As Integer
admin
2019-07-30
56
问题
窗体上有名称为Commandl的命令按钮,其事件过程如下:
Option Base 1
Private Sub Command l_Click()
Dim a
Dim b(10)As Integer
a=Array(2,4, 7,3,9,6)
For i=LBound(a)To UBound(a)
b(i)=a(i)+i
Sum=Sum+b(i)
Next i
Print Sum
End Sub
运行程序,单击命令按钮时,窗体上显示的是
选项
A、44
B、46
C、50
D、52
答案
D
解析
本题中使用了一个循环为b数组进行赋值,每个元素的值是对应a数组元素的值加上下标的值。因此b数组中的元素为(3、6、10、7、14、12),然后累加和为52。
转载请注明原文地址:https://www.kaotiyun.com/show/hlUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生文件夹下有一个工程文件sjt3.vbp,在程序运行时,单击“输入整数”按钮,可以从键盘输入一个整数,并在窗体上显示此整数的所有不同因子和因子个数。如图3—158(a)是输入53后的结果,如图3—158(b)是输入100的结果。已经给出了全部控件
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为Text1的文本框,其高、宽分别为400、2000。运行后的窗体如图3—112所示。请在属性框中设置适当的属性满足以下要求:①Te
数列1,1,3,5,9,15,25,41,…,的规律是从第三个数开始,每个数是它前面两个数的和加1。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图3—192所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画1个名称为Frame1、标题为“项目”的框架;框架内有1个名称为opt1的控件数组,该控件数组含有三个标题分别为“篮球”“排球”“足球”的单选
某人设计了如下程序用于计算并输出7!(7的阶乘)PrivateSubCommand1_Click()t=0Fork=7To2Step-1t=t*kNextPritetEnd
设有如下Command1的单击事件过程及fun过程:PrivateSubCommand1_Click()PrivateSubfun(xAsInteger)DimxAsInteger
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimI,NumRandomizeDoForI=1To1000Num=Int(R
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString.strLAsIntegertStr=""strL=Len(xStr)i=1
以下关于事件、事件驱动的叙述中,错误的是
下列不能打开工具箱窗口的操作是()。
随机试题
置换动火前打开容器的入孔、手孔、清扫孔等,其作用是为了____。
账证核对一般核对的是()
患者,女,26岁,既往梅毒病史3年,现早孕,孕检提示:TPPA(+),TRUST(1:2)首选治疗方法
根分叉病变的主要病因是
可以和藜芦一起使用的药是
A律师事务所为招揽更多的业务,实行按案件标的额为介绍案件的人提取一定的“案件介绍费”,并且对几个较为重大的案件,给予了“介绍人”一定数额的费用。由于在某一案件上通过这一办法将B律师事务所的案件揽走,B律师事务所对A律师事务所的这一行为向有关司法行政机关进行
选择压实机械的原则是()。
资金的价值是随时间变化而变化的,资金在运动中( )的部分就是原有资金的时间价值。
物流模数尺寸(集装基础模数尺寸)不包括()。
A—labelsB—carbonpaperC—correctionfluidD—staplerandstaplesE—massagepadsF—documentfilesG—plasticpocketsH—adhesiveta
最新回复
(
0
)