首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有名称为Command1的命令按钮,其事件过程如下: Option Base 1 Private Sub Command1_Click() Dim a Dim b(10) As Integer a = Array(2, 4,
窗体上有名称为Command1的命令按钮,其事件过程如下: Option Base 1 Private Sub Command1_Click() Dim a Dim b(10) As Integer a = Array(2, 4,
admin
2020-02-27
27
问题
窗体上有名称为Command1的命令按钮,其事件过程如下:
Option Base 1
Private Sub Command1_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
解析
所有维的数组缺省下界都是 0 或 1,这取决于 Option Base 语句的设置。本题中有语句Option Base 1,所以LBound(a) = 1,UBound(a) = 6;For循环进行求和计算,结果为52,选D)。
转载请注明原文地址:https://kaotiyun.com/show/MLTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上有一个文本框Text1,Text属性值为空,然后编写如下事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimstrAsString,nAsInteger
运行以下程序后,输出的图案是()。Form1.CIsA$=String$(10,"*")Fori=1To5n=10-2*iX$=AS:Y$=Space$(n)Mid$(X$,i+1,
在窗体上有一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为File1的文件列表框,两个名称分别为Labe11、Labe12的标签(标题分别为空白和“共有文件”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化
单击命令按钮执行以下程序,则输出结果为()。PnvmeSubCommand1_Click()DimxAsInteger,yAsIntegerx=14:y=48:CallProc(x,y)Pri
在学校里,教师可以讲授不同的课程,同一课程也可由不同教师讲授,则实体教师与实体课程间的联系是()。
以下关于VB对象属性的叙述中,错误的是()。
有下面程序代码:PrivateSubCommandl—Click()a=Array(1,2,3,4,5,6,7,8,9,10)n=UBound(a)Fork=0ToUBound(a)/2Prin
下列叙述中错误的是()。
软件按功能可以分为:应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是()。
设有表达式:A=IIf(x>y,"go","back")。以下与该表达式具有相同功能的语句是
随机试题
Ithasbeenjustlysaidthatwhile"wespeakwithourvocalorganswe【C1】con________withourwholebodies."Allofuscommunica
实际生产过程中,为提高反应过程的目的产物的单程收率,宜采用以下哪种措施?()
乳样,乙醚试验苏丹Ⅲ染色为红色草黄微浊,细胞数高于500乘以十的六次方/L、蛋白36g/L、1DH330IU/L
治疗风湿热并心脏损害最合理的是
根据《环境影响评价技术导则一生态影响》,生态现状调查的内容和指标应能反映评价工作范围内的()。
计算机的速度涉及()指标。
试论述配送中心绩效管理的策略。
随着心脏病成为人类的第一杀手,人体血液中的胆固醇含量越来越引起人们的重视。一个人血液中的胆固醇含量越高,患致命的心脏病的风险也就越大。至少有三个因素会影响人的血液中的胆固醇的含量,它们是抽烟、饮酒和运动。如果上述断定为真,则以下哪项一定为真?
要实现报表按某字段分组统计输出,需要设置的是()。
TheroleofeyecontactinaconversationalexchangebetweentwoAmericansiswelldefined;speakersmakeacontactwiththeey
最新回复
(
0
)