首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form_Load() Shape1.Top=0 Timer1.Interval=100
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form_Load() Shape1.Top=0 Timer1.Interval=100
admin
2018-05-08
25
问题
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下:
Private Sub Form_Load()
Shape1.Top=0
Timer1.Interval=100
End Sub
Private Sub Timer1_Timer()
Static x As Integer
Shape1.Top=Shape1.Top+100
x=x+1
If x Mod 10=0 Then
Shape1.Top=0
End If
End Sub
以下关于上述程序的叙述中,错误的是( )。
选项
A、每执行一次Timer1_Timer事件过程,x的值都在原有基础上增加1
B、Shape1每移动10次回到起点,重新开始
C、窗体上的Shape1由下而上移动
D、Shape1每次移动100
答案
C
解析
题目中变量x定义为Static,即每次进入Timer事件过程时,x都会保留上次的值,从而实现每执行一次Timer1_Timer事件过程x的值都在原有基础上增加1。程序中判断调用Timer事件过程10次后,重置Shape1的top值为0,即回到起点。控件Shape1的Top属性是距离窗体顶的位置,数值越大距离越远,因此Shape1会由上向下移动。
转载请注明原文地址:https://kaotiyun.com/show/gqGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果为()。Forml.Clsa=“ABBACDDCBA”Fori=6To2Step_2x=Mid(a,i,i)y=Left(a,i)z=Right(a,i)z=x&y&zNextiPrintz
下列叙述中,不属于软件需求规格说明书的作用的是()。
在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码:OptionBaselPrivateSubCommandl_Click()Dimaa=Array(1,2,3,4)j=lFori=4To1
设a=5,b=6,c=7,d=8,执行下列语句后,x的值为()。x=IIf((a>b)And(c>d),10,20)
下面关于多重窗体的叙述中,正确的是()。
在窗体上画一文本框,其名称为Textl,为了在程序运行后隐藏该文本框,应使用的语句为
在标准模块中,将a定义为全局整型变量的语句是
计算下面分段函数的正确语句是
负责数据库中查询操作的数据库语言是( )。
某二叉树共有845个结点,其中叶子结点有45个,则度为1的结点数为
随机试题
《中华人民共和国精神卫生法》属于我国法律体系中的()。
猪苓、茯苓的共同功效是__________、__________。但猪苓__________作用强;而茯苓有__________,__________的功效。
深Ⅱ度烧伤。若无感染等并发症,通常愈合时间为
会计核算软件是依据现代信息技术开发而成的,现代信息技术极大地改变了会计数据处理方式,因此,会计核算软件已经不再处理会计业务数据。()
甲股份有限公司因现金流转发生困难,经与乙股份有限公司协商进行债务重组。重组协议规定如下:甲公司以现金50万元和一台设备偿还所欠乙公司债务450万元。该设备的原价为360万元,已计提折旧120万元;公允价值为330万元;假设不考虑发生的相关税费。在该债务重组
我国目前是采用批发价格指数作为衡量价格总水平变动的基本指标。()
我国历史上最早的一支比较正规的人民警察队伍是()。
下列复用方式中,(112)是光纤通信中使用的复用方式,EI载波把32个信道按(113)方式复用在一条2.048Mb/s的高速信道上,每条话音信道的数据速率是(114)。
CommercialclassicalmusicradioinNorthAmericahaschangeddramaticallyoverthepastdecade.Thenumberofstationshasshru
TheArtofPublicSpeakingThinkwhatmighthappenifyoutriedtobuildahousewithoutafloorplanoranarchitect’sblu
最新回复
(
0
)