在窗体上画一个名称为Timerl的计时器控件,其Enabled属性值设为False,Interval属性值设为100。要求程序运行后,当鼠标在窗体上移动时,沿鼠标经过的轨迹画出一系列半径为100的小圆。其效果如图所示,以下是实现上述功能的程序,请填空。

admin2012-12-21  30

问题 在窗体上画一个名称为Timerl的计时器控件,其Enabled属性值设为False,Interval属性值设为100。要求程序运行后,当鼠标在窗体上移动时,沿鼠标经过的轨迹画出一系列半径为100的小圆。其效果如图所示,以下是实现上述功能的程序,请填空。

Dim a As Integer,b As Integer
Private Sub Form_______(Button As Integer,Shift As Integer。X As Single,Y As Single)
    a:=X
    b:=Y
    Timerl.Enabled=
End Sub
Private Sub Timerl Timer()
    Forml.Circle(a,b),100       以(a,b)为圆心面一个半径为100的圆
End Sub

选项

答案MotaseMove.True

解析 第14空可以根据后面的参数可判断出为鼠标操作。在操作中,因为没有其他地方用到Timer.因此第15空必须埴写ture。
转载请注明原文地址:https://jikaoti.com/ti/LEO0FFFM
0

随机试题
最新回复(0)