首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程: Private Sub Command1_Click() Dim arr(10) For i=6 To 10 arr(i)=i-5 N
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程: Private Sub Command1_Click() Dim arr(10) For i=6 To 10 arr(i)=i-5 N
admin
2018-07-11
48
问题
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程:
Private Sub Command1_Click()
Dim arr(10)
For i=6 To 10
arr(i)=i-5
Next i
Label1.Caption=arr(0)+arr(arr(10)/ arr(6))
End Sub
运行程序,单击命令按钮,则在标签中显示的是( )。
选项
A、0
B、1
C、2
D、3
答案
A
解析
程序为使用For语句为数组中部分元素赋值,没显示赋值的数组元素的值默认为0,因此arr(0)=0,arr(10)=10-5=5,arr(6)=6-5=1,arr(arr(10)/ arr(6))即,arr(5 / 1)=arr(5)=0,arr(0)+arr(5)=0+0=0。因此标签中显示为0。
转载请注明原文地址:https://kaotiyun.com/show/kzFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
对于能够获得焦点的控件,若要使其不能接收焦点,应该
能正确表述“x为大于等于5并且小于20的数”的VisualBasic表达式是
PrintRight("VBProgramming",2)语句的输出结果是
执行语句DimX,YAsInteger后,
设程序中有以下语句:MsgBox"Visual",,"Basic","等级考试",2执行该语句后,显示一个信息框,以下关于该信息框的叙述中,正确的是
在窗体上画一个名称为Text1的文本框,并编写如下程序:OptionBase1PrivateSubForm_Click()DimartDimStartAsInteger,FinishAsIntegerSumAsIn
设有下面的程序段:X=InputBox(”请输入一个整数”)ReDima(x)Fork=xTo0Step-1a(k)=kNextk一般,在这段程序之前应先进行数组a的定义。下面定义语句中正确的是
下列程序段执行后,输出的结果是()。Fork1=0To4y=20Fork2=0To3y=10Fork3=0To2y=y+10Nextk3Nextk2Nextk1 Printy
下列程序执行后,其输出结果为()。Dima(5)Fori=0To4a(i)=i+1:m=i+1Ifm=3Thena(m-1)=a(i-2)Elsea(m)=a(i)Ifi=2Thena(i-1)=a(m-3)a(4
(1)在名称为Form1的窗体上添加一个名称为Shapel的形状控件,要求在属性窗口中将其形状设置为椭圆,其短轴(垂直方向)、长轴(水平方向)的长度分别为800、1600。把窗体的标题改为“Shape控件”,窗体上无最大化、最小化按钮。程序运行后的窗体如图
随机试题
下列说法中,正确的是()。
专家预言,如果不采取有利措施,未来十几年,在中国将呈“井喷式”爆发的健康问题是
非处方药的分类是根据药品的
该批货物的提单号为“7865435”。( )该批货物可以在青岛以外的港口入境,但需与出口国协商一致。( )
从总体上说,松的货币政策将使证券市场价格上扬,紧的货币政策将使证券市场价格下跌。()
确定重要性时要选定基准,在选择基准时,不需要考虑的因素是()。
南仁东,FA.ST项目首席科学家、总工程师,把二十余载的精力都留给了“中国天眼”,从建设射电望远镜设想的提出,到最为艰难的选址,再到攻克技术上的一个又一个难关,最终建成了世界上最大口径射电望远镜FA.ST。“他从壮年走到暮年,把一个朴素的想法变成了国之重器
办公软件中的字体在操作系统中有对应的字体文件,字体文件中存放的汉字编码是()。
PriscillaOuchida’s"energy-efficient"houseturnedouttobeahorribledream.Whensheandherengineerhusbandmarriedafew
Accordingtotheman,whichofthefollowingisNOTthereasonwhythepartyissuccessful?
最新回复
(
0
)