首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form—Load() Shapel.Top=0 Timerl.Inter
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form—Load() Shapel.Top=0 Timerl.Inter
admin
2019-03-14
63
问题
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下:
Private Sub Form—Load()
Shapel.Top=0
Timerl.Interval=100
End Sub
Private Sub Timer1_Timer()
Static x As Integer
Shapel.Top=Shapel.Top+100
x=x+1
If x Mod 10=0 Then
Shapel.Top=0
End If
End Sub
以下关于上述程序的叙述中,错误的是( )。
选项
A、每执行一次Timer1_Timer事件过程,x的值都在原有基础上增加1
B、Shapel每移动10次回到起点,重新开始
C、窗体上的Shapel由下而上移动
D、Shapel每次移动100
答案
C
解析
题目中变量x定义为Static,即每次进入Timer事件过程时,x都会保留上次的值,从而实现每执行一次Timer1-Timer事件过程x的值都在原有基础上增加1。程序中判断调用Timer事件过程10次后,重置Shapel的top值为0,即回到起点。控件Shapel的Top属性是距离窗体顶的位置,数值越大距离越远,因此Shapel会由上向下移动。
转载请注明原文地址:https://kaotiyun.com/show/vOFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:PublicxAsIntegerPrivateyAsInteger窗体文件的程序代码是:DimaAsIntegerPrivateSubForm_Load()
以下能够正常结束循环操作的程序段是
(1)在标题为“列表框”、名称为Form1的窗体上添加一个名称为List1的列表框,通过属性窗口输入4个列表项:“数学”、“语文”、“历史”、“地理”,列表项形式采用复选框形式。如图所示。列表框的宽为1100,高不限。注意:存盘时必须存放在考生文
设窗体上有1个名称为List1的列表框,程序运行时,如果选中了第3个列表项(最上面的列表项为第0个列表项),则下面不成立的是
下列关于栈的叙述中,正确的是
(1)在名称为Form1的窗体上添加一个图片框,名称为Pic,通过属性窗口将考生文件夹下的文件Tu1—1.jpg添加到图片框,然后编写适当的事件过程。运行程序时,单击窗体,在图片框中显示“VB等级考试”,如图所示。注意:要求程序中不得使用变量,事
有数据定义语句:DimX,YAsInteger以上语句表明
按照“后进先出”原则组织数据的数据结构是
层次型、网状型和关系型数据库划分原则是
随机试题
某工厂生产多种产品,每种产品又要使用多种零件,一种零件可能装在多种产品上。每种零件由一种材料制造,每种材料可用于不同零件的制作。有关产品、零件、材料的数据字段如下:产品:产品号(GNO),产品名(GNA),产品单价(GUP)零件:零件号(PNO
不属于血液分析仪性能评价的指标为
下列各项中,()不是我国证券账户的种类。
生产观念致力于解决下列企业经营中()的问题。
2008年6月10日,甲公司(非上市公司)将其账面价值为2000000元的某项固定资产以2500000元的价格变卖给其子公司A公司,并确认营业外收入500000元。A公司购入后作为固定资产使用,并以2500000元作为固定资产的成本入账。固定
()初年的大槐树下迁民对河南社会发展的推动作用巨大。
Paintingyourhouseislikeaddingsomethingtoahugecommunalpictureinwhichtherestofthepaintingisdoneeitherbynatu
设有两个事务T1和T2,其并发操作序列如下表所示。下列说法中正确的是
Johniscrazyaboutpopmusic.
MildweatherhasbroughtJapan’smuch-lovedcherrytreesinto(36)______twoweeksearlythisyear,butnoteveryoneis(37)____
最新回复
(
0
)