首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Form_Click() Dim a(5) As Integer, b(3) As Integer Dim k As Integer k = 1 For i = 1 To 5
编写如下程序: Private Sub Form_Click() Dim a(5) As Integer, b(3) As Integer Dim k As Integer k = 1 For i = 1 To 5
admin
2019-06-20
47
问题
编写如下程序:
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全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
不能正确表示条件“两个整型变量A和B之一为0,但不能同时为0”的布尔表达式是()。
目录列表框的Path属性的作用是()。
下面程序运行后,语句“Printi”执行的次数是()。PrivateSubForm_Click()DimiAsInteger,jAsIntegeri=0Doi=i+1Forj=10To1Step-3i=i+jPri
下面的程序运行时,单击窗体后,窗体上显示的结果是()。PrivateSubForm_Click()Dima(1To6)AsIntegerDimmin1%,i%,j%,n%,t%,k%a(1)=8:a(2)=6:a(3)=9:a(4
设有以下函数过程PrivateFunctionFun(a()AsInteger,bAsString)AsInteger…EndFunction若已有变量声明:Dimx(5)AsInteger,nAsInteger,chA
下面的程序执行完毕后,组合框中数据项的值是()。PrivateSubForm_Click()Fori=1To6Combo1.AddItemiNextiFori=1To3Combo1.RemoveItemiNextiE
在关系中凡能惟一标识元组的最小属性集称为该表的键或码。二维表中可能有若干个键,它们称为该表的()。
设x为一整型变量,且语句的开始为:SelectCasex,则不符合语法规则的Case子句是
表达式12/2\4的值是
随机试题
《春之声》中最能体现作品主题的一句话是()。
Pickouttheappropriateexpressionsfromtheeightchoicesbelowandcompletethefollowingdialoguesbyblackeningthecorresp
A.包埋前染色B.包埋后染色C.包埋中染色D.超薄切片免疫染色E.石蜡切片免疫染色超微结构保存较好,方法简单但抗原活性可能减弱
下列施工检测方法中利用了贝克曼梁法原理的题目是()。
使方程左右两边相等的未知数的值,叫做方程的解。像上面,x=150就是方程100+x250的解。求方程的解的过程叫做解方程。x=3是方程5x=15的解吗?x=2呢?试分析方程与算术式的区别。
Readingmakesafullman;conferenceareadyman;andwritinganexactman.
完成以下数列()。
新时期教师职业道德规范的核心内容是()。
Inmuchofthedevelopingworld,lackofwaterisatthecenterofaviciouscircleofinequality.SomewomeninForocomeclown
Hetoldastoryabouthissisterwhowasinasad______whenshewasillandhadnomoney.
最新回复
(
0
)