首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体的左右两端各有1条直线,名称分别为Line1、Line2;名称为Shape1的圆靠在左边的Line1直线上(见图);另有1个名称为Timer1的计时器控件,其Enabled属性值是True。要求程序运行后,圆每秒向右移动100,当圆遇到Line2时则停
窗体的左右两端各有1条直线,名称分别为Line1、Line2;名称为Shape1的圆靠在左边的Line1直线上(见图);另有1个名称为Timer1的计时器控件,其Enabled属性值是True。要求程序运行后,圆每秒向右移动100,当圆遇到Line2时则停
admin
2015-08-28
37
问题
窗体的左右两端各有1条直线,名称分别为Line1、Line2;名称为Shape1的圆靠在左边的Line1直线上(见图);另有1个名称为Timer1的计时器控件,其Enabled属性值是True。要求程序运行后,圆每秒向右移动100,当圆遇到Line2时则停止移动。
为实现上述功能,某人把计时器的Interval属性设置为1000,并编写了如下程序:
Private Sub Timer1_Timer()
For k=Line1.X1 To Line2.X1 Step 100
If Shape1.Left+Shape1.Width
Shape1.Left=Shape1.Left+100
End If
Next k
End Sub
运行程序时发现圆立即移动到了右边的直线处,与题目要求的移动方式不符。为得到与题目要求相符的结果,下面修改方案中正确的是( )。
选项
A、把计时器的Interval属性设置为1
B、把For k=Line1.X1 To Line2.X1 Step 100 和 Next k两行删除
C、把For k=Line1.X1 To Line2.X1 Step 100 改为 For k=Line2.X1 To Line1.X1 Step 100
D、把If Shape1.Left+Shape1.Width
答案
B
解析
在计时器事件中不应再设置步长为100的For循环,应该把For循环去掉,只留下循环体的语句,计时器每秒激发一次,每次判断小球是否移到Line2处,不到就改变自己的Left值即继续移动。因此B正确。
转载请注明原文地址:https://kaotiyun.com/show/whLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
启动窗体在【】对话框中指定。
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drive1、Dir1和File1。当改变目录列表框的内容时,要求文件列表框中显示当前选中的文件夹中的内容,则在Dir1_Change事件过程中应使用的语句是______。
下面叙述中正确的是______。
滚动条控件中,用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是______。
下列程序段的执行结果为______。I=0ForG=10To19Step3I=I+1NextGPrintI
在用通用对话框控件建立“打开”或“保存”对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是______。
在窗体上有一个计时器控件Timer1和一个标签控件Label1,在程序运行时可通过每隔30毫秒让Lable1左移100缇,从而产生文字移动动画效果。文字从右向左移动,当移动到接近窗体左边界时停止移动。空格处应填______。PrivateSub
软件需求分析—般应确定的是用户对软件______。
在窗体上画一个列表框、一个命令按钮和一个标签,其名称分别为List1、Command1和Label1,通过属性窗口把列表框中的项目设置为:“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后,在列表框中选择一个项目,然后单击命令按钮。
如下有一段不完整的程序段,如果要求该程序执行3次循环,则在程序中的空白处要填入()。x=1Dox=x+3PrintxLoopUntil______
随机试题
试述领导方式理论的基本观点。
下列哪一项是肿瘤()
下列关于工程建设项目招标投标资格审查的说法中,错误的是()。
下列用地中,可以采取划拨方式取得使用权的有()。
汽车制造厂既销售自产汽车,又提供汽车修理修配服务,这属于增值税的混合销售业务。()
初中教育的个体发展任务是什么?
设α=[a1,a2,…,an]T≠0,β=[b1,b2,…,bn]T≠0,且αTβ=0,A=E+αβT.试计算:An.
设随机变量X,Y同分布,X的密度为f(x)=设A={X>a}与B={Y>a}相互独立,且P(A+B)=3/4,求:E(1/X2)
Americans’Health-careSystemSmallWonder?ItissaidthatinEnglanddeathispressing,inCanadainevitableandinCalif
AccordingtotheOxfamreport,thenext20yearswillsee______percentincreaseintheneedforfood.
最新回复
(
0
)