![[填空题] 在窗体上画一个名称为Timer1的计时器控件，其Enabled属性值为False，Interval属性值设为100。要求程序运行后，当鼠标在窗体上移动时，沿鼠标经过的轨迹画出一系列半径为1,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E5%9C%A8%E7%AA%97%E4%BD%93%E4%B8%8A%E7%94%BB%E4%B8%80%E4%B8%AA%E5%90%8D%E7%A7%B0%E4%B8%BATimer1%E7%9A%84%E8%AE%A1%E6%97%B6%E5%99%A8%E6%8E%A7%E4%BB%B6%EF%BC%8C%E5%85%B6Enabled%E5%B1%9E%E6%80%A7%E5%80%BC%E4%B8%BAFalse%EF%BC%8CInterval%E5%B1%9E%E6%80%A7%E5%80%BC%E8%AE%BE%E4%B8%BA100%E3%80%82%E8%A6%81%E6%B1%82%E7%A8%8B%E5%BA%8F%E8%BF%90%E8%A1%8C%E5%90%8E%EF%BC%8C%E5%BD%93%E9%BC%A0%E6%A0%87%E5%9C%A8%E7%AA%97%E4%BD%93%E4%B8%8A%E7%A7%BB%E5%8A%A8%E6%97%B6%EF%BC%8C%E6%B2%BF%E9%BC%A0%E6%A0%87%E7%BB%8F%E8%BF%87%E7%9A%84%E8%BD%A8%E8%BF%B9%E7%94%BB%E5%87%BA%E4%B8%80%E7%B3%BB%E5%88%97%E5%8D%8A%E5%BE%84%E4%B8%BA1.png "[填空题] 在窗体上画一个名称为Timer1的计时器控件，其Enabled属性值为False，Interval属性值设为100。要求程序运行后，当鼠标在窗体上移动时，沿鼠标经过的轨迹画出一系列半径为1,第1张")
[填空题] 在窗体上画一个名称为Timer1的计时器控件，其Enabled属性值为False，Interval属性值设为100。要求程序运行后，当鼠标在窗体上移动时，沿鼠标经过的轨迹画出一系列半径为100的小圆。其效果如图所示。以下是实现上述功能的程序，请填空。Dim a As Integer, b As IntegerPrivate Sub Form_（）(Button As Integer,Shift As Integer,X As Single,Y As Single)a=Xb=YTimer1.Enabled=（）End SubPrivate Sub Timer1_timer( )Form1.Cirle(a,b),100 ‘以(a,b)为圆心画一个半径为100的圆End SubPrivate Sub Form（）(Button As Integer,Shift As Integer,X As Single,Y As Single)
正确答案：MouseMove
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）