首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮和一个标签,其名称分别为Commandl和Labell,然后编写如下事件过程: Private Sub Commandl _Click() Dim arr(10) For i=6 To 10 arr(i)=i一5 Next i La
在窗体上画一个命令按钮和一个标签,其名称分别为Commandl和Labell,然后编写如下事件过程: Private Sub Commandl _Click() Dim arr(10) For i=6 To 10 arr(i)=i一5 Next i La
admin
2019-04-29
47
问题
在窗体上画一个命令按钮和一个标签,其名称分别为Commandl和Labell,然后编写如下事件过程:
Private Sub Commandl _Click()
Dim arr(10)
For i=6 To 10
arr(i)=i一5
Next i
Labell.Caption=art(0)+art(arr(10)/arr(6))
End Sub
运行程序,单击命令按钮,则在标签中显示的是
选项
A、0
B、1
C、2
D、3
答案
A
解析
在本题的循环中分别将arr(6)到 arr(10)的数组元素赋值为1~5,而arr(0)到arr(5)~数组元素没有被赋值,将保留默认初值0,即最后标签上显示的是art(0)+arr(5)=0。
转载请注明原文地址:https://kaotiyun.com/show/X2Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommandlClick()DimmAsInteger,nAsIntegerm=1:n=0DoWhilem
窗体上有1个名称为Commandl的命令按钮,事件过程及函数过程如下:PrivateSubCommandlClick()DimmAsStringm;InputBox(“请输入字符串”)Printpick_str(m)EndSub
窗体上有名称为Commandl的命令按钮,其事件过程如下:OptionBase1PrivateSubCommand1Cliek()DimaDimb(10)AsIntegera=Array(2,4,7,3,9,6)Fori=L
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下:OptionBase1PrivateSubCommand1Click()Dima(4,4)AsIntegerFori=1To4Forj=1To4a(i
以下过程的功能是从数组中寻找最大值:PrivateSUbFindMax(aOAsInteger,ByRefMaxAsInteger)DimSAsInteger,fAsIntegerDimiAsIntegerS=LBoun
在窗体上画一个名称为Textl的文本框,并编写如下程序:OptionBase1.PrivateSubFormClick()DimartDimStartAsInteger,FinishAsIntegerSumAsInteg
下列数组定义中错误的是
设有如下数组定义语句:Dima(一1To4,3)AsInteger以下叙述中正确的是
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性,该属性为
随机试题
诊断深处脓肿主要依据是
男性,35岁。诉刷牙和咬硬物时牙出血3个月。有时口腔有异味。口腔检查:上下前牙唇侧牙龈缘红肿肥厚,龈乳头呈球状增生,菌斑指数平均2,牙石指数2。探诊牙龈出血。
破伤风前驱期不应有的症状是()
基桩成孔质量检验包括泥浆性能和成孔质量两大方面的内容()。
李某和张某共同出资创办一个合伙企业,其中李某出资25万元,张某以其专利作价15万元出资,由于企业经营不善,出现较为严重的亏损,累计负债20万元。根据以上资料,回答下列问题:以下关于合伙制企业特点说法错误的是()。
隋文帝时进行的重要改革包括()。①确立三省六部制②废除九品中正制③使府兵制与均田制相结合④部分推行以庸代役
A、43.0%B、44.30%C、58.43%D、63.68%D
设y=.
HowtoapproachWritingTestPartTwo•Thisparttestsyourabilitytowritelongerletters,faxesandemails.•Readthei
A、Around6p.m.B、Around7p.m.C、Around8:30a.m.D、Around8:30p.m.D根据女士所说的“around8:30”可知,她将在8:30左右到达车站。而由常识可知,派对一般都是晚上举
最新回复
(
0
)