编写如下程序： Private Sub Form_Click() Dim a(5) As Integer, b(3) As Integer Dim k As Integer k = 1 For i = 1 To 5

admin2019-06-20 61

问题编写如下程序：
Private Sub Form_Click()
Dim a(5) As Integer, b(3) As Integer
Dim k As Integer
k = 1
For i = 1 To 5
      a(i) = i
Next i
For i = 1 To 3
      b(i) = 2 * a(i)
Next i
For i = 1 To 3
      k = k + b(i) * 2
Next i
Print k
End Sub
运行程序，单击窗体，输出结果是

选项 A、31
B、32
C、25
D、30

答案C

解析通过For循环，对整型数组a和b分别赋值，a=[1，2，3，4，5]，b=[2，4，6]，k是在原值基础上再加b每个元素值得两倍，故k=1+2*2+4*2+6*2=25，故选C项。

转载请注明原文地址:https://kaotiyun.com/show/JcUp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画1个命令按钮，其名称为C1，标题为“等级考试”；再画1个文本框，名称为T1，如图2-107(a)所示。请编写适当的事件过程，使程序运行
在考生文件夹下有一个工程文件sjt5．vbp，其名称为Forml的窗体上已有三个文本框Text1、Text2、Text3，以及程序。请完成以下工作：①在属性窗口中修改Text3的适当属性，使其在运行时不显示，作为模拟的剪贴板使用，窗体如图2一15
在考生文件夹下的“samp1．accdb”数据库文件中已建立表对象“tStud”和“tScore”、宏对象“mTest”和窗体“fTest”。请按以下要求，完成各种操作。(1)分析并没置表“tScore”的主键。(2)将学生“入校时间”
考生文件夹下有一个数据库文件“samp3．accdb”，其中存在已经设计好的表对象“tBand”和“tLine”，同时还有以“tBand”和“tLine”为数据源的报表对象“rBand”。请在此基础上按照以下要求补充报表设计。(1)在报表的报表页
为计算1+2+22+23+24+…+210的值，并把结果显示在文本框TeXtl中，若编写如下事件过程：PrivateSubCommand1_Click()Dima％，b％，i％s=1：a=2Fori=2To10a=a*2：b=b+aNex
从键盘上输入一个浮点数asingle，利用字符串函数对该数进行处理后，如果输出的内容不是“非浮点数”，则对程序输出的内容分析正确的是()。asingle=InputBox("请输入一个浮点数：")str1$=Str$(asingle)：p=In
在窗体上有2个图片框，名称分别为Picture1和Picture2，Picture2中添加了香蕉图片(见图3)，且将Picture2．DragMode属性设置为1。要求程序运行时，可以用鼠标把Picture2拖拽到Picture1中(见图4)。以下可以实现
在考生文件夹中有一个工程文件sjt5．vbp。窗体外观如图3—169所示。运行程序，单击“读数据”按钮，文件中的数据被读入字符串变量中并显示在Label2标签中。单击“排序”按钮时，对读入的数据从小到大排序，并将排序结果显示在窗体的Label4控件中。要求
表达式2*3^2+4*2／2+3^2的值是
下列排序方法中，最坏情况下比较次数最少的是

随机试题

下面哪项不是包涵体肌炎的临床特点
患儿，女，10个月。人工喂养，夜间多汗，睡眠不好。查体可见枕秃，肋缘外翻。血钙正常，血碱性磷酸酶增高。腕骨X线干骺端增宽，边缘不整。诊断为维生素D缺乏性佝偻病。与本病无关的病因是
下列哪一项不是抗生素范畴
关于经济因素对健康的影响，不正确的说法是
运距60～100m范围内能同时完成取土、运土、铺筑、初压的土方作业机械有()。
人工预算单价计算方法按工程分类有()两种计算方法和标准。
项目的可行性研究是项目业主或发起人为了确定投资方案而进行的工作，一般由设计和咨询机构完成，此种工作属于()
根据民事诉讼法规定，下列()案件由特定人民法院管辖。
（2015年）甲公司为居民企业。2014年有关收支情况如下：(1)产品销售收入2500万元，营业外收入70万元。(2)发生合理的工资薪金150万元，职工供暖费补贴23万元、防暑降温费20万元。(3)发生广告费300万元，税收滞纳金6万元、环保部门罚款
如果一种存储器的总线工作频率为333MHz，数据线宽度为32位，每个存储器总线周期传输1次数据，则该存储器的带宽为【55】_______MB／s。AM29LV160是一种典型的NORFlash芯片，芯片内部具有20条地址线和16条数据线，该芯片的存储容量

最新回复(0)

编写如下程序： Private Sub Form_Click() Dim a(5) As Integer, b(3) As Integer Dim k As Integer k = 1 For i = 1 To 5

二级VB

NCRE全国计算机二级

请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画1个命令按钮，其名称为C1，标题为“等级考试”；再画1个文本框，名称为T1，如图2-107(a)所示。请编写适当的事件过程，使程序运行

在考生文件夹下有一个工程文件sjt5．vbp，其名称为Forml的窗体上已有三个文本框Text1、Text2、Text3，以及程序。请完成以下工作：①在属性窗口中修改Text3的适当属性，使其在运行时不显示，作为模拟的剪贴板使用，窗体如图2一15

在考生文件夹下的“samp1．accdb”数据库文件中已建立表对象“tStud”和“tScore”、宏对象“mTest”和窗体“fTest”。请按以下要求，完成各种操作。(1)分析并没置表“tScore”的主键。(2)将学生“入校时间”

考生文件夹下有一个数据库文件“samp3．accdb”，其中存在已经设计好的表对象“tBand”和“tLine”，同时还有以“tBand”和“tLine”为数据源的报表对象“rBand”。请在此基础上按照以下要求补充报表设计。(1)在报表的报表页

为计算1+2+22+23+24+…+210的值，并把结果显示在文本框TeXtl中，若编写如下事件过程：PrivateSubCommand1_Click()Dima％，b％，i％s=1：a=2Fori=2To10a=a*2：b=b+aNex

从键盘上输入一个浮点数asingle，利用字符串函数对该数进行处理后，如果输出的内容不是“非浮点数”，则对程序输出的内容分析正确的是()。asingle=InputBox("请输入一个浮点数：")str1$=Str$(asingle)：p=In

在窗体上有2个图片框，名称分别为Picture1和Picture2，Picture2中添加了香蕉图片(见图3)，且将Picture2．DragMode属性设置为1。要求程序运行时，可以用鼠标把Picture2拖拽到Picture1中(见图4)。以下可以实现

表达式2*3^2+4*2／2+3^2的值是

下列排序方法中，最坏情况下比较次数最少的是

下面哪项不是包涵体肌炎的临床特点

患儿，女，10个月。人工喂养，夜间多汗，睡眠不好。查体可见枕秃，肋缘外翻。血钙正常，血碱性磷酸酶增高。腕骨X线干骺端增宽，边缘不整。诊断为维生素D缺乏性佝偻病。与本病无关的病因是

下列哪一项不是抗生素范畴

关于经济因素对健康的影响，不正确的说法是

运距60～100m范围内能同时完成取土、运土、铺筑、初压的土方作业机械有()。

人工预算单价计算方法按工程分类有()两种计算方法和标准。

项目的可行性研究是项目业主或发起人为了确定投资方案而进行的工作，一般由设计和咨询机构完成，此种工作属于()

根据民事诉讼法规定，下列()案件由特定人民法院管辖。

如果一种存储器的总线工作频率为333MHz，数据线宽度为32位，每个存储器总线周期传输1次数据，则该存储器的带宽为【55】_______MB／s。AM29LV160是一种典型的NORFlash芯片，芯片内部具有20条地址线和16条数据线，该芯片的存储容量

表达式23^2+42／2+3^2的值是