窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form_Load0 Shapel.Top=0:Timer1.Interval=1 00

admin2013-10-16  32

问题 窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下:
Private Sub Form_Load0
    Shapel.Top=0:Timer1.Interval=1 00
End Sub
Private Sub Timer l_Timer()
    Static x As Integer
    Shapel.Top=Shapel.Top+100
    x=x+1
    If x Mod 1 0=0 Then
         Shapel.Top=0
    End If
End Sub
以下关于上述程序的叙述中,错误的是

选项 A、每执行一次Timerl_Timer事件过程,x的值都在原有基础上增加1
B、Shapel每移动10次回到起点,重新开始
C、窗体上的Shapel由下而上移动
D、Shapel每次移动100

答案C

解析 在计时器事件中的变量x是一个静态变量,事件结束后其值仍然会保留,所以每执行一次Timerl Timer事件过程,x的值都在原有基础上增加1;每次x能被10整除均令形状的Top属性为0,即回到起点;形状控件在计时器事件中每次Top值均增加100,即自上而下进行移动,每次100 。
转载请注明原文地址:https://kaotiyun.com/show/qFQp777K
0

最新回复(0)