首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,其名称为Text1,然后编写如下程序: Option Base 1 Private Sub Form_Click() Dim Arr(10)As Integer For i=6 To 10 Arr(i)=i-3 Next i Text
在窗体上画一个文本框,其名称为Text1,然后编写如下程序: Option Base 1 Private Sub Form_Click() Dim Arr(10)As Integer For i=6 To 10 Arr(i)=i-3 Next i Text
admin
2020-04-18
56
问题
在窗体上画一个文本框,其名称为Text1,然后编写如下程序:
Option Base 1
Private Sub Form_Click()
Dim Arr(10)As Integer
For i=6 To 10
Arr(i)=i-3
Next i
Text1.Text=str(6)+Arr(Arr(6)+Arr
(10)))
End Sub
程序运行后,单击窗体,在文本框中显示的内容是
选项
A、7
B、8
C、9
D、10
答案
D
解析
For循环对数组Arr的第6个到第10个元素赋值。Art(6)=3;Art(10)=7;因此,输出结果是10。选D。
转载请注明原文地址:https://www.kaotiyun.com/show/VeTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,然后编写如下代码:PrivateSubCommand1_Click()DimMaxSize,NeXtChar,MyCharOpen"d:\temp\female.txt"ForInputAs
如图所示,在窗体上有一个文本框控件,名称为TextTime:一个计时器控件,名称为Timer1。要求每1s在文本框中显示一次当前的时间。PrivateSubTimer1TextTime.Text=TimeEndSub
在窗体上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下事件过程:PrivateSubCommand1_Click()x=0doWhilex<50
为了使窗体的大小可以改变,必须把它的BorderStyle属性设置为()。
某人编写了下面的程序,希望能把Text1文本框中的内容写到Temp.txt文件中PrivateSubCommand1_Click()Open"Temp.txt"ForOutputAs#2Print"Text1"
在窗体上有一个名称为Label1的标签和一个名称为Timer1的计时器,并编写有如下几个事件过程:PrivateSubForm_Load()Timer1.Enabled=FalseTimer1.Interval=____
设置定时器控件的Interval属性为2000,Enabled属性为True,并且有下面的事件过程,程序运行时计算机将发出()次Beep声。SubTimer1Timer()BeepEndSub
已知数组Dima(1To10)AsInteger,则下面正确调用GetValue函数的是()。PrivateFunctionGetValue(a()AsInteger)AsIntegerFori=
设有一个有10个元素的数组,下列程序将该数组的第1个元素与第10个元素交换,第2个元素与第9个元素交换……,第5个元素与第6个元素交换,在横线处应填写()。PrivateSubCommand1_Click()Dima(1
对建立良好的程序设计风格,下面描述正确的是()。
随机试题
女性生殖道黏膜下浆膜细胞分泌的最丰富的免疫球蛋白是
抗体筛查不能单独使用的方法是
挤压呼吸气囊,每次可进入肺内的空气量是()。
以下不会出现肺血增多的X线表现的是
某非法吸发收公众存款刑事案件,因涉及人数众多,影响面广,当地领导私下曾有“必须重判”的说法。①主审李法官听此说法即向院长汇报。②开庭时,李法官对律师提出的非法证据排除的请求不予理睬?③李法官对刘检察官当庭反驳律师无罪辩护意见、
一容器内贮有某种理想气体,其压强为1.01325×105Pa,温度为27℃,密度为1.300kg/m3,求气体的摩尔质量,并确定它是()。
政策性金融机构的经营原则不包括()。
企业转让无形资产使用权时,如果合同或协议规定一次性收取使用费,且不提供后续服务的,应视同销售该项无形资产一次性确认收入。()
甲公司2006年2月2日从其拥有80%股份的被投资企业A购进设备一台,该设备成本70万元,售价100万元,增值税17万元,另付运输安装费8万元,甲公司已付款且该设备当月投入使用,预计使用5年,净残值为零,采用年限平均法计提折旧。甲公司2007年末编制合并报
说学逗唱:江河湖海
最新回复
(
0
)