问题 单项选择题

看体上有一个名称为Timer1的计时器控件,一个名称为shape1的形状控件,其Shape属性值为3(Cirele)。编写程序如下:

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事件过程时,都会保留上次的值,从而实现每执行一次Timer1_Timer事件过程x的值都在原有基础上增加1。程序中判断调用Timer事件过程10次后,重置shape1的top值为0,即回到起点。控件Shape1的Top属性是距离窗体顶的位置,数值越大距离越远,因此Shape1会由上向下移动。

单项选择题
单项选择题